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CHAPTER  I 


INTRODUCTION 


The  purpose  of  this  manual  is  to  document  the  MADEM  Software  Archi¬ 
tecture.  It  is  designed  for  use  by  programmers  charged  with  maintaining  or 
modifying  MADEM.  Those  wishing  to  use  MADEM  in  a  study  are  referred  to  the 
MADEM  ANALYST  MANUAL. 

Chapter  II  of  this  manual  provides  an  overview  of  the  MAOEM  Software 
Architecture.  Its'  primary  objective  is  to  associate  particular  sub¬ 
routines  with  particular  simulation  control  and  modeling  functions.  A 
secondary  objective  is  to  provide  a  basic  explanation  of  the  data  storage 
system  used  in  MADEM.  A  general  knowledge  of  the  subroutines  combined  with 
an  understanding  of  the  data  storage  system  provide  a  context  within  which 
the  more  detailed  information  in  Chapter  III,  the  Appendices  and  the  Source 
Code  may  be  used. 

Chapter  III  of  this  manual  contains  detailed  Data  Structure  Docu¬ 
mentation.  This  information  is  crucial  to  an  understanding  of  the  MADEM 
Software.  MADEM  uses  a  complex  list  processing  system  to  store  and 
retrieve  data.  In  this  system  the  relationship  among  various  blocks  of 
data  is  as  important  to  the  functioning  of  the  software  as  the  contents  of 
the  blocks.  Groups  of  related  data  blocks  form  data  structures  which,  in 
effect,  "drive"  the  software.  Therefore,  it  is  impossible  to  understand 
the  Source  Code  without  a  clear  picture  of  the  data  structures  and  their 
contents. 


CHAPTER  II 

SOFTWARE  ARCHITECTURE 


A.  INTRODUCTION 


The  primary  objective  of  this  chapter  is  to  associate  particular 
subroutines  with  the  model  functions  they  control.  A  secondary  objective 
is  to  introduce  the  user  to  the  data  storage  system  used  in  MADEM.  More 
detailed  information  on  subroutines  and  data  structures  is  contained  in  the 
Aopendices,  the  Source  Code  and  in  Chapter  III  of  this  report. 

B.  IMPLEMENTATION  LANGUAGE 


MADEM  was  implemented  in  accordance  with  principles  of  topdown 
structured  programming.  Prior  to  code  generation,  the  MADEM  design  was 
specified  in  a  BDM  developed  Program  Design  Language  (PDL).  The  concepts 
and  procedures  involved  in  the  use  of  PDL  are  discussed  in  Appendix  C.  In 
essence,  the  PDL  for  a  given  subroutine  constitutes  the  equivalent  of  a 
logic  flow  diagram  for  the  subroutine.  The  PDL  for  each  MADEM  subroutine 
appears  in  the  source  code.  Information  on  the  basic  purpose,  the  inputs 
and  outputs,  and  the  calling  interfaces  for  each  subroutine  is  given  in 
Appendix  I.  The  overall  model  structure  is  reflected  by  the  subroutine 
call  diagrams  in  Appendix  J. 

The  design  specified  by  the  MADEM  PDL  was  implemented  in  FORTRAN.  A 
special  precompiler  was  used  to  allow  convenient  access  to  MADEM' s  many 
dynamically  allocated  data  blocks.  This  precompiler  is  the  BDM  developed 
Modular  Information  Data  Access  system  (MIDAS),  which  is  described  in 
Appendix  B.  MIDAS  provides  two  important  capabilities.  The  first  allows 
automatic  replacement  of  specified  one  line  macro- i nstructions  by  corre¬ 
sponding  sets  of  FORTRAN  instructions.  This  feature  is  used  to  insure 
uniformity  ’n  the  definition  of  named  COMMONS  from  routine  to  routine.  The 
second  important  MIDAS  capability  allows  reference  by  name  to  elements  of 
dynamically  allocated  data  blocks.  Thus,  for  example,  MIDAS  may  permit  a 


8 


reference  of  the  form  $P. TYPE.  RATES  to  be  used  in  place  of  a  corresponding 
FORTRAN  reference  ITR( ITR(P+L)+5) ,  where  P  has  been  declared  a  pointer  to  a 
data  block  of  a  type  known  to  MIDAS. 

C.  DATA  STRUCTURES 


Most  of  the  data  employed  by  MADEM  is  stored  internally  in  data  blocks 
dynamically  allocated  from  various  storage  arrays.  Many  types  of  such 
blocks  are  employed,  each  having  a  block  name  and  most  having  a  set  of 
element  names  (and  types)  known  to  the  MIDAS  translator.  Having  estab¬ 
lished  a  pointer  to  such  a  block  and  having  indicated  the  block  type  in  a 
MIDAS  "DECLARE"  statement,  a  programmer  may  then  reference  any  entry  in  the 
block  by  name.  Chapter  III  presents  descriptions  for  all  of  the  MADEM  data 
block  types;  the  MIDAS  name  for  each  block  is  given,  along  with  comments  on 
the  use  of  the  block  within  the  simulation.  The  name,  type,  and  meaning 
(use)  of  each  element  of  the  block  is  also  given.  The  structure  and 
contents  of  each  type  of  data  block  as  implemented  in  MIDAS  code  is  also 
indicated  in  Appendix  E. 

In  addition  to  common  storage  arrays  for  dynamically  allocated  data 
blocks,  MADEM  employs  a  number  of  other  named  COMMON  storage  areas  for 
holding  simulation  control  information  and  temporary  working  data.  Chapter 
III  presents  each  of  the  COMMONS  and  indicates  the  meaning  (use)  of  each 
e 1 ement. 

D.  SIMULATION  CONTROL 


The  purpose  of  this  section  is  to  discuss  Simulation  Control  and 
Management  Functions  within  MADEM  and  to  associate  particular  subroutines 
with  these  functions. 

1 .  Top  Level  Control 

The  Top  Level  Control  routines  for  MADEM  are  shown  in  Figure 
1 1 - 1 .  MADEM  is  the  main  routine  which  invokes  the  four  major  control 
routines;  OTHERDAT,  LRKPRS,  DELADD,  and  CONTROL.  At  the  u3ers  option  MADEM 
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LEVEL 


1 


2 


3 


© 


may  also  invoke  ENTSTAT  which  provides  a  variety  of  subroutine  diagnostics 
at  various  points  in  program  execution. 

OTHEROAT  controls  input  to  the  (NON-UOIL)  Data  Base.  The  con¬ 
tents  and  structure  of  this  data  base  are  described  in  detail  in  Chapter 
III  of  this  report.  The  data  input  procedure  is  documented  in  Chapter  IV 
of  the  MADEM  ANALYST  MANUAL. 

LRKPRS  controls  semantinc  processing  of  the  User  Oriented  Input 
Language  (UOIL)  inputs.  The  data  structures  which  are  built  from  these 
inputs  are  discussed  in  Chapter  III  of  this  report.  The  Input  Language  and 
data  requirements  are  documented  in  Chapter  IV  of  the  MADEM  Analyst  Manual. 
LRKPRS  invokes  two  secondary  control  subroutines-  SEMANT  and  NXTSYM. 

LRKPRS  and  NXTSYM  parse  the  input  sentences  and  convert  them  to  "ICODES" 
which  are  passed  to  SEMANT.  SEMANT  converts  these  "ICODES"  to  data 
structures  of  various  kinds.  Users  are  cautioned  to  avoid  modifications  to 
LRKPRS,  NXTSYM  and  SEMANT  unless  they  are  well  versed  in  semantic  process¬ 
ing  techniques. 

DELADD  controls  processing  of  descrete  events  in  MADEM.  It  adds 
"events"  to  a  Leftist  EVENT  TREE  structure  which  is  used  to  sort  events 
scheduled  by  the  various  program  modules.  Events  control  is  discuss'ed  in 
further  detail  in  section  of  D.4  and  in  Appendix  E.  of  this  manual. 

CONTROL  invokes  three  major  control  subroutines-  uTREE,  SELECT, 
and  HLTPNT.  LTREE  removes  "EVENTS"  from  the  EVENT  TREE  constructed  by 
DELADD.  Events  are  removed  and  processed  in  order  of  their  occurance. 

These  "EVENTS"  are  then  processed  by  SELECT.  Based  on  an  internal  coding 
system  for  EVENTS,  (see  Appendix  F)  SELECT  invokes  one  of  nine  program 
modules.  Each  of  these  modules  (represented  in  Figure  D-l  by  their  main 
control  routines)  performs  all  of  the  functions  required  by  the  EVENTS. 

The  functions  of  each  module  are  summarized  in  Table  1 1 - 1 .  Additional 
information  on  each  module  is  provided  in  Section  F.3,  and  Appendix  I  of 
this  Manual  as  well  as  in  the  source  code.  If  a  Termination  of  Simulation 
event  is  found  by  LTREE,  the  simulation  termination  subroutine  HLTPNT  is 
invoked  by  CONTROL.  HLTPNT  controls  printing  of  termination  messages  and 
output  files  to  be  stored  for  subsequent  use  by  the  main  processor  and  post 
processor. 
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TABLE  II-l. 
MADEM  MODULE  SUMMARY 


MODULE  CONTROL/ROUTINE  FUNCTION 


ASSIGN 

ATTACK 

COMMO 

DOGFITE 

ENGAGE 

FLY 

NAYBOR 


PERCEPT 

PLAN 

PONDER 

TOWER 

UMPIRE 


COMBAT  REPORTING  CENTER  MAKES 
OF  INTERCEPTORS  TO  RED  FLIGHTS 
CARRY  OUT  GROUP  ATTACK  BY  RED 
FLIGHTS 

COMMUNICATIONS  TRANSMISSION 
AIR  TO  AIR  COMBAT  PROCESSES 
SURFACE  TO  AIR  MISSLE 
ENGAGEMENT  DECISIONS 
AIRCRAFT  MOVEMENT 
DETERMINE  NEARBY  UNITS  AND 
SCHEDULE  ALL  UNITS  FOR  A 
CHANCE  TO  "SEE"  AN  ACTION 
CONTROLS  PERCEPTION  OF  OTHER 
UNITS 

RED  THREAT  PLANNING 
UNIT  INFORMATION  PROCESSING 
AIRBASE  OPERATIONS 
SIMULTANEOUS  EVENT  CONTROL 
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2. 


Initial ization 


The  subroutines  devoted  solely  to  initialization  are: 

(1)  BDALT 

(2)  BDLEX 

(3)  8DLRK 

(4)  BDPARS 

(5)  BUD  AT 

(6)  FETCH 

All  but  one  of  these  (BLKOAT)  are  used  only  by  the  Lexical  Analyzer  Rou¬ 
tines.  They  contain  parsing  tables  which  are  essential  to  the  UOIL  decod¬ 
ing  process.  BLKDAT  is  used  to  initialize  the  MADEM  main  routine.  FETCH 
reads  input  data  files  for  the  main  routine. 

3.  Storage  M  laqement 

To  provide  maximum  flexibility  in  the  types  of  scenarios  which 
can  be  handled  by  MADEM,  a  system  of  dynamic  storage  allocation  is 
employed.  The  majority  of  data  in  MADEM  is  shored  in  a  single  array 
( I SPACE ,  or  SPACE)  from  which  storage  space  is  dynamically  allocated. 

Thus,  deletion  of  data  of  one  type  frees  space  for  data  of  other  types. 

The  subroutines  exclusively  devoted  in  storage  allocation  are: 

(1)  GIMME 

(2)  RELEASE 

(3)  RELIST 

subroutines  GIMME  and  RELEASE  are  the  general  purpose  storage  management 
routines  employed  in  MADEM.  To  obtain  a  data  block  of  length  N  (N=l-20) 
the  statement. 

Call  GIMME  (P,N)  is  used.  The  return  value  Pisa  pointer  to  the 
allocated  block  (address  of  the  first  word  of  the  block  in  the  ISPACE 
array).  When  the  block  is  no  longer  needed,  the  statement. 

Call  RELEASE  (P,N)  releases  the  block  for  subsequent  reallo¬ 
cation.  The  released  block  is  placed  in  a  garbage  collection  matrix  (see 
Chapter  III  .H)  'hich  consists  of  lists  of  blocks  of  various  sizes.  When  a 
block  of  a  given  size  is  required,  GIMME  searches  this  list  to  find  a 
release  block  of  the  desired  size  before  it  allocates  virgin  storage  space. 
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Because  very  large  blocks  are  seldom  called  for,  released  blocks  over  20 
words  long  are  broken  down  into  more  commonly  used  four  word  blocks  by  the 
subroutine  RELIST.  Further  details  on  storage  space  management  are  con¬ 
tained  in  Chapter  III  of  this  manual. 

4.  Event  Control 

Since  MADEM  is  an  event  stepped  simulation,  the  management  of 
notices  for  pending  events  is  an  important  component  of  simulation  control. 
The  following  subroutines  are  devoted  to  this  function: 

(1)  DELADD 

(2)  LTREE 

DELADD  is  used  to  add  events  to  a  quisisorted  LEFTIST  EVENT  TREE  in  which 
the  nearest  events  in  time  are  placed  closest  to  the  top  of  the  tree.  The 
top  event  block  on  the  tree  always  contains  the  next  event  code  to  be 
processed.  LTREE  is  used  to  extract  a  pending  event  from  the  EVENT  TREE. 
The  calling  hierachies  of  DELADD  and  LTREE  are  illustrated  in  Figure 
II-2. 

DELADD  invokes  three  subroutines  -  GIMME,  SNAP,  AND  LTRMRG. 

GIMME  allocates  storage  space  for  the  new  event  block,  SNAP  adds  the  newly 
created  block  to  the  event  tree,  and  LTRMRG  sorts  the  event  tree  to  place 
all  of  the  event  blocks  in  the  correct  order  with  respect  to  the  top  of  the 
tree. 

LTREE  removes  the  event  block  from  the  tree,  passes  the  event 
code  stored  in  the  block  to  SELECT  and  releases  the  storage  space  formerly 
used  by  the  event  block  by  invoking  the  subroutine  RELEASE. 

An  overview  of  event  processing  is  shown  in  Figure  I I - 3 . 

Event  blocks  are  added  to  the  event  tree  as  actions  are  taken  by  the 
various  program  modules  invoked  by  SELECT.  SELECT  is  in  turn  driven  by 
event  codes  extracted  from  the  event  tree  by  LTREE.  This  process  continues 
throughout  the  simulation  until  a  termination  event  is  found  by  LTREE. 

When  this  occurs,  HLTPNT  is  called  by  CONTROL  and  the  simulation  is  HALTED. 
Detailed  documentation  of  this  dynamic  event  scheduling  algorithum  as  well 
as  a  listing  of  event  codes  may  be  found  in  Appendices  E  and  F  of  this 
manual . 
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Figure  1 1- 3-  Event  Processing  Overview 
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E.  DIAGNOSTICS 


The  purpose  of  this  section  is  to  document  the  diagnostic  capabilities 
which  have  been  built  into  the  MADEM  software.  A  working  knowlege  of  these 
debug  and  data  structure  display  routines  is  essential  to  anyone  who  must 
maintain  or  modify  MAD EM.  The  operation  of  all  diagnosis  subroutines  is 
discussed  in  detail  in  Appendix  J  of  this  report. 

1 .  Debug  Routines 

There  are  over  300  subroutines  in  the  current  version  of  MADEM. 

A  program  of  this  size  cannot  be  developed  and  maintained  without  some 
resident  debug  and  error  recovery  capability  built  into  the  software.  In 
MADEM  the  following  subroutines  are  devoted  to  this  function: 


ENTRYP 

DBGREAD 

EXITP 

HALT 

ENTSTAT 

ICHECK 

RECOVR 

ITRAP 

RECCON 

RECER 

ROUTER 

MADEM' s  resident  debug  capabilities  are  based  on  the  subroutine 
entry  and  exit  tracking  routines  ENTRYP  and  EXITP.  ENTRYP  and  EXITP  are 
called  at  the  beginning  and  end  of  nearly  all  routines  in  MADEM.  Together 
they  construct  a  circular  list  and  pushdown  stack  of  subroutine  calls. 

They  also  construct  a  vector  of  subroutine  entry  counts  and  a  corresponding 
vector  of  cumulative  subroutine  execution  times.  The  circular  list  and 
pushdown  stack  allow  the  user  to  track  the  execution  of  all  subroutines  and 
to  pinpoint  fatal  error  locations.  The  vectors  of  entry  counts  and  execu¬ 
tion  times  provides  useful  information  on  re  usage  and  efficiency  of  sub¬ 
routines.  At  the  user's  option  ENTRYP  and  EXITP  will  print  out  subroutine 
entry  and  exit  messages  for  specified  subroutines  during  normal  program 
execution.  Also  at  the  user's  option,  ENTRYP  and  EXITP  will  call  debug 
routines  ICHECK  and  ITRAP  (explained  below)  for  specified  subroutine  calls 


to  ENTRYP  and  EXITP. 


A  frequent  list  processing  bug  involves  a  zero  or  one  digit 
ISPACE  pointer.  For  this  reason,  the  first  ten  words  of  ISPACE  are 
reserved  for  nonuse,  and  should  always  be  zero  when  none  of  these  bugs 
occur.  Debug  routine  ITRAP  checks  that  area  of  ISPACE  and  stops  the  simu¬ 
lation  by  calling  HALT  whenever  nonzero  values  are  found  there. 

If  it  is  desired  to  find  out  when  other  locations  in  ISPACE 
change  value,  debug  routine  I  CHECK  can  be  used.  ICHECK  holds  pointers  to 
up  to  ten  ISPACE  locations,  as  defined  by  input  parameters  on  each  run. 

Any  time  one  of  these  ISPACE  locations  has  a  change  in  value,  a  one  line 
message  is  printed  indicating  the  old  value,  the  new  value,  and  the  routine 
being  executed  when  the  change  was  noticed. 

The  vectors  of  subroutine  entry  counts,  cumulative  and  average 
execution  times,  and  flags  indicating  the  ENTRYP  and  EXITP  options  speci¬ 
fied  are  printed  by  ENTSTAT. 

RECOR  is  a  CDC  System  routine  which  is  automatically  activated 
within  MADEM,  but  may  be  turned  off  at  the  user's  option.  It  allows  the 
program  to  regain  control  at  the  time  that  abnormal  job  termination  would 
otherwise  occur.  It  calls  the  MADEM  subroutine  RECCQN  in  the  event  of 
catastrophic  program  failure. 

RECCQN  can  only  be  activated  by  RECOR.  RECCQN  calls  HALT,  which 
stops  the  simulation  and  prints  debug  information. 

ROUTER,  which  can  be  called  from  any  routine,  prints  the  sub¬ 
routine  name,  the  circular  list  subroutines  called,  and  the  pushdown  stack 
containing  the  calling  hierarchy. 

RECER  is  the  same  as  router  except  that  RECER  does  not  know  the 
calling  subroutine's  name. 

DBGREAD  is  the  subroutine  that  reads,  interprets,  and  processes 
all  the  debug  input  parameters  that  may  be  specified  for  each  run.  See 
Appendix  J  for  further  details. 

HALT  is  the  routine  that  is  called  whenever  the  simulation  is  to 
be  stopped,  whether  it  be  abnormal  or  normal  terminations.  HALT  saves  the 
HOLD  files  and  calls  the  appropriate  subroutines  to  print  valuable  debug 
information.  HALT  prints  the  name  of  the  1st  routine  executed  as  well  as 
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the  reason  for  termination,  the  game  time  of  the  simulation,  and  the  number 
of  events  executed  in  the  volume.  HALT  then  calls  the  following  routines: 


TRACE 

prints  current  calling  hierarchy 

RECER 

- 

(see  above) 

ENTSTAT 

- 

(see  above) 

CLIST 

- 

prints  key  pointer  values 

ISDUMP 

- 

if  selected,  prints  entire  ISPACE  array 

2.  Data 

Structure  Display  Routines 

Because  of  the  complex  nature  of  the  data  structures  used  in 
MADEM  and  their  importance  to  the  operation  of  MADEM  subroutines,  a  series 
of  data  structure  and  common  block  display  subroutines  have  been  developed. 
These  subroutines  include  the  following: 

CLIST 

ISDUMP 

DISPOAT 

NIPULATOR 

CLIST  is  usjed  to  print  out  the  contents  of  all  major  common 
blocks  used  in  MADEM.  Key  information  contained  in  these  blocks  includes 
array  dimensions  and  pointer  values.  ISDUMP  is  used  to  print  out  the  con¬ 
tents  of  the  dynamic  storage  array  ISPACE  within  which  all  data  structures 
reside.  The  outputs  from  CLIST  and  ISDUMP  may  be  used  to  manually  trace 
data  structures  in  ISPACE. 

However,  since  manual  data  structure  tracing  rapidly  becomes  time 
consuming  and  error  prone,  a  variety  of  automated  data  structure  display 
subroutines  have  been  constructed.  The  two  foremost  of  these  are  DISPDAT 
and  NIPULATOR.  DISPDAT  outputs  a  formatted  display  of  the  DATA  BASE  STRUC¬ 
TURE,  the  EVENT  TREE  STRUCTURE  and  specified  portions  of  ISPACE. 

In  addition  to  the  above  display  subroutines,  a  series  of  data 
block  display  subroutines  has  been  developed  which  allows  the  user  to  build 
"custom"  data  structure  display  systems  to  suit  special  needs.  Each  data 
block  has  its  own  display  subroutine  which  can  display  the  block  or  all 
blocks  in  a  linked  list  at  the  user's  option.  These  block  display  subrou¬ 
tines  can  be  placed  under  the  control  of  special  purpose  control  routines 


19 


developed  by  the  user.  User  supplied  control  subroutines  combined  with  the 
block  display  subroutines  constitute  a  "modular"  data  structure  display 
system  which  can  be  reconfigured  at  the  user's  option.  Further  details  are 
provided  in  Appendix  J. 

F.  SOFTWARE  COMPONENTS 


The  purpose  of  this  section  is  to  introduce  the  reader  to  the  major 
components  of  the  MADEM  software  system.  Detailed  operating  instructions 
may  be  found  in  Appendix  A  of  this  manual  and  Chapter  IV  of  the  analyst 
manual . 

1 .  Processor  Configuration 

MADEM  has  three  major  software  components  -  a  preprocessor,  a 
main  processor,  and  a  postprocessor.  The  overall  configuration  of  these 
processors  and  their  input  and  output  files  is  illustrated  in  Figure  II-4. 

The  preprocessor  (sometimes  referred  to  as  INITBIN)  reads  user 
inputs,  which  include  the  data  base  and  red  threat  planning  speci f ications , 
translates  these  inputs  into  appropriate  data  structures  and  carriers  out 
the  red  threat  planning  process.  The  resulting  red  attack  plan  is  then 
saved  on  a  "HOLD  FILE"  for  subsequent  use  by  the  main  processor  also  out¬ 
puts  a  printed  summary  of  the  red  attack  plan  and  a  'HISTORY  FILE".  The 
HISTORY  FILE  contains  a  record  of  unit  creation  events  whcih  can  be  used  by 
the  postprocessor  to  construct  summary  tables  of  the  types  of  units  created. 

The  main  processor  (sometimes  referred  to  as  RUNBIN)  is  used  to 
simulate  the  actual  combat  processes  which  result  from  the  red  attack.  The 
main  processor  is  run  in  a  cyclical  fashion.  The  initial  main  processor 
run  is  made  using  the  RED  ATTACK  PLAN  HOLD  FILE  as  input.  Combat  processes 
are  then  carried  out  for  approximately  one  hour  of  game  time  after  which 
execution  is  terminated  and  as  HOLD  FILE  containing  the  status  of  all  units 
at  the  end  of  the  hour  is  output.  This  HOLD  FILE  then  becomes  the  input 
for  the  next  main  processor  cycle.  Each  of  these  main  processor  cycles  is 
referred  to  as  a  volume.  As  many  volumes  can  be  run  as  one  required  to 
simulate  the  desmed  duration  of  conflict.  However,  the  validity  of  the 


20 


PARAMETER 

OPTIONS 


UOIL 

INPUT 


DATA  BASE 
INPUT 


PARAMETER 

OPTIONS 


RED  ATTACK 
PLANNING 
OUTPUT 


CYCLE  IS 
REPEATED 
FOR  AS  MANY 
VOLUMES  (HRS) 
AS  REQUIRED 


_ 

PARAMETER 

POST  PROCESSOR 

PRINTED 

OPTIONS 

(HISTBIN) 

OUTPUT 

L 

Figure  1 1-4.  MADEM  Processor  Conf iguration 


4368/7  9W 


simulation  probably  declines  rapidly  after  8-11  hours  of  combat.  The  main 
processor  also  outputs  an  EVENT  TRACE  and  a  History  File.  The  EVENT  trace 
records  all  of  combat  events  which  occured  during  the  volume.  The  History 
File  contains  a  record  of  key  events  which  can  be  used  by  the  postprocesser 
to  summarize  the  battle. 

The  postprocessor  (sometimes  referred  to  as  HISTBIN)  reads 
History  Files  output  by  the  preprocessor  and  main  processor  and  outputs  a 
variety  of  tabular  summaries  of  the  battle.  These  outputs  include  the 
fol 1 owi ng: 

(1)  Red  Aircraft  acquired  by  Blue  Defense  Units 

(2)  Red  Aircraft  engaged  by  Blue  Defense  Units 

(3)  Red  Aircraft  damaged  by  Blue  Defense  Units 

(4)  Blue  Units  damaged  by  Red  Aircraft 

(5)  Weapon  System  expenditures  by  Unit  Type 

(6)  Number  of  Red  Aircraft  to  reach  Targets 

(7)  Number  of  Units  created  by  Type 


2.  Preprocessor  Functions  And  Subroutines 

The  following  lists  summarize  the  functions  carried  out  by  vari¬ 
ous  preprocessor  subroutines.  Low  level  utilities  have  been  deleted  from 
these  list.  For  a  complete  calling  hierarchy  and  detailed  subroutine 
documentation  see  Appendices  I  and  II,  and  the  Source  Code, 
a.  Top  Level  Control  Routines 
MADEM  -  Main  Routine 

OTHERDAT  -  Constructs  Simulation  Data  Base 

LRKPRS  -  LR(K)  Parser 

SEMANT  -  Semantic  Processing  of  UOIL 

CONTROL  -  Event  Control 

SELECT  -  Selects  Appropriate  Event  Module 

PLAN  -  Red  Threat  Planning 

HLTPNT  -  Halts  Simulation 

ENTSAT  -  Simulation  software  Use  Statistics 
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b.  Simulation  Data  Base  Construction 

OTHEROAT  -  Controls  Construction  of  Data  Base 

ADDBLOK  -  Adds  a  Data  Block  to  the  Top  of  a  Singly 

Linked  List  Structure 

FINDBLOK  -  Finds  a  Data  Block  with  a  Specified  Value  in 
a  Singly  Linked  List  Structure 

c.  Semantic  Processing  Of  UOIL 

SEMANT  -  Controls  Semantic  Processing 

C0DE01  -  Initialized  Hex  and  C2  Trees 

CODE03  -  Constructs  C2  Tree  and  Related  Structures 

SRCHPL  -  Searches  the  Players  List 

LOAOPL  -  Enters  a  Unit  onto  the  Players  List 

ABQUEVE  -  Sets  up  Airbase  Data  Structures 

ADASASS  -  Constructs  CRC,  BOC  and  BTRY  Structures 

SCHTAB  -  Sets  Hex  Altitude  From  Altitude  Data  Base 

C0DE05  -  Constructs  Hex  Tree  and  Related  Lists 

VOLLOAD  -  Places  a  unit  on  a  Hex's  Unit  Occupancy  List 

TGTLIST  -  Constructs  Target  List 

INITACQ  -  Initializes  Acquisition  Devices 

C0DE18  -  Locates  Targets  in  Hex  Tree 

d.  Lexical  Analyzer 

LRKPRS  -  LR(K)  Parser 

RDCELL  -  Split  Out  Fields  in  Read  State 

NXTSYM  -  Get  Next  Symbol 

LEXAN  -  Lexical  Analyzer 

CHRGEN  -  Character  Generator 

ADDCHR  -  Add  Character  to  a  String 

LOOKUP  -  Lookup  String  in  a  Table 

EXTSCN  -  Process  Real  and  Integer  Numbers 

ERROR  -  Parser  Error  Recovery 

APCEL  1  -  Split  out  fields  of  apply  state  1 

APCEL  2  -  Split  Out  Fields  of  Apply  State  2 

LACELL  -  Split  Out  Fields  of  Look-Ahead  State 

CARD  -  Read  Card/Print  Card 
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Red  Threat 

Planning 

PLAN 

- 

Controls  Red  Threat  Planning 

THTRPLN 

- 

Red  Theater  Planner 

CORBOUN 

- 

Creates  Corridor  Boundary  Structures 

REVISE 

- 

Revises  Red  Force  Allocations 

ABVSCOR 

- 

Matches  Airbases  with  Corridors 

CLOSCOR 

- 

Finds  Closest  Corridor  to  an  Airbase 

CANDTGT 

- 

Considers  Candidate  Targets 

JGESUIT 

- 

Determines  Geographic  Sutiability  of  Targets 

FORMTGT 

- 

Assigns  Formations  to  Targets 

TGTGCNE 

- 

Changes  Target  Stands  to  Now-Available 

AVAILBL 

- 

Changes  Target  Status  to  Available 

SCHEDUL 

- 

Controls  Flight  Scheduling 

RENDEVU 

- 

Calculates  Formation  Rendevous  Points 

ACFRAG 

- 

Sets-Up  FI ight  Frag' s 

CRFLTML 

- 

Creates  Flight  Data  Structures 

FLTGEOM 

- 

Determines  Flight  Mission  Geometry 

PLANOUT 

- 

Outputs  Results  of  Planning  Process 

RLRAID 

- 

Releases  Raidblok  Structures 

RLWAVE 

- 

Releases  Wave  Structures 

RLTGTYP 

- 

Releases  Target  Type  Structures 

RLFMAKT 

- 

Releases  formation  Structures 

RLCORO 

- 

Releases  Corridor  Structures 

RLABDB 

- 

Releases  Airbase  Structures 

Common  Utilities 

ADDBLOK 

- 

Adds  a  Data  Block  to  the  Top  of  a  Linked  List 

CREATE 

- 

Creates  Unit  SB  and  C2  Data  Structures 

DROPBLOK 

- 

Drops  a  Block  from  a  Singly  Linked  List 

FINDBLOK 

- 

Finds  a  Block  on  a  Singly  Linked  List 

GETHEX 

- 

Finds  or  Creates  a  Hex  Block 

GIMME 

- 

Allocates  Storage  Space 

HEXADO 

- 

Adds  To  Hex  Numbers 

HEXCHZ 

- 

Chooses  Next  Hex  for  a  Flight  to  move  to 
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HEXDIST  -  Calculates  Distance  Between  Two  Hexes 

HEXINV  -  Calculates  Inverse  of  a  Hex  Number 

HEXMULT  -  Hex  Multiplication  by  a  Single  Digit 

HISTORY  -  Records  an  Event  for  Prost  Processing 

HXDGTS  -  Places  a  Hex  Number  in  the  IDIGITS  Array 

LINEX  -  Determines  Intersection  of  Two  Lines 

LNPLOT  -  Prints  a  Line  on  the  Output  File 

MESAGE  -  Prints  a  Message  on  the  Output  File 

OPTPTH  -  Finds  Shortest  Path  Between  Two  Hexes 

PAGE  -  Advances  Page  of  Output 

PELADD  -  Adds  Target  Blocks  to  the  Potential  Target 

Tree 

PTREE  -  Extracts  a  Block  From  the  Target  Tree 

PTRMRG  -  Sorts  Target  Tree 

RELEASE  -  Releases  Storage  Space 

RELIST  -  Subdivides  Large  Released  Blocks 

RITEI  -  Prints  an  Integer  Value 

RITEP  -  Prints  a  Pointer  Value  (octal) 

RITER  -  Prints  a  Real  Value 

THH2PS  -  Translates  Hex  to  Point  Slope 

THX2XY  -  Translates  Hex  to  X , Y  Coordinates 

TLL2HX  -  Translates  Lat-Long  To  Hex 

TXY2HXL  -  Translates  X,Y  to  Hex  at  Specified  Level 

PACK  -  Packs  Two  Halfword  Fields  (non-midas) 

VNPACK  -  Unpacks  Two  Halfword  Fields  (non-midas) 

NOWUCIT  -  Hex  Peeper  List  Update 

GETPIRS  -  Pointer  Retrieval 

KOMPARE  -  Compares  Two  Packed  Words  and  Stores  a  New 

Value  in  the  Specified  Field. 

Block  Data  Routines 
BDALT  -  Semantic  Processing 

BDLEX  -  Semantic  Processing 

BDLRK  -  Semantic  Processing 


BDPARS  -  Semantic  Processing 

BLKDAT  -  Initialization 

3.  Main  Processor  Functions  And  Subroutines 

The  following  lists  summarize  the  functions  carried  out  by  vari¬ 
ous  main  processor  subroutines.  For  a  complete  calling  hierarchy  and 
detailed  subroutine  documentation  see  Appendices  I  and  J  and  the  Source 
Code.  Although  They  are  not  repeated  in  this  section,  all  of  the  Red 
Threat  planning  functions  and  Subroutines  found  in  the  preprocessor  are 
also  resident  in  the  main  processor. 

a.  Top  Level  Control  Routines 

MADEM  -  Main  Routine 

FETCH  -  Reads  Hold  Files 

CONTROL  -  Event  Control 

SELECT  -  Selects  Appropriate  Event  Module 

ASSIGN  -  Controls  CRC  Assisgment  of  Interceptions 

ATTACK  -  Control  Red  Flight  Ground  Attacks 

COMMO  -  Controls  Communications 

DOGFITE  -  Controls  Air  to  Air  Combat 

ENGAGE  -  Controls  Surface  to  Air  Engagement 

FLY  -  Controls  Aircraft  Movement 

NAYBOR  -  Controls  Determination  of  Unit  Proximity 

PERCEPT  -  Controls  Perception  of  other  Units 

PLAN  -  Controls  Red  Threat  Planning 

PONDER  -  Controls  Unit  Information  Processing 

TOWER  -  Controls  Airbase  Operations 

UMPIRE  -  Controls  Simultaneous  Event  Processing 

b.  CRC  Assignment  Of  Interceptions  To  Red  Flights 

ASSIGN  -  Controls  CRC  Assignments  of  Red  Flights 

INTASIN  -  CRC  Attempts  Interceptor  Assignment 

TGTHEX  -  Calculates  Interception  Point  for  Two  Flights 

BTNASIN  -  CRC  Attempts  BOC  Assignment 


c. 


Red  Flight  Group  Attack  Process 


d. 


e . 


ATTACK 

SHRKILL 

DESTROY 

TERMACQ 

KILFLIT 

FLTWYPE 

SAMWYPE 

BYENOPS 

SEEKP 

CRCLOSS 

BNLALLE 

HANDZPT 

BATCEAS 

CANCALO 

READIL 

RELOCAT 

SEEKTFV 

TRKCHEK 

TOAOIL 

ALLOFU 

ALLOPAT 

DILOUT 

CNACTIK 

CRCDIES 

NUKBLND 


Controls  Red  Flight  Ground  Attacks 
Shorad  Engaged  Flights 

Actions  Carried  Out  When  Unit  is  Destroyed 
Terminates  Acquisition  Devices  and  Peeper 
list 

Actions  Carried  Out  Flight  Dies 
Wipes  Out  Flight  Action  Order  List 
Actions  Carried  Out  When  A  Sam  Unit  Dies 
Battery  End  Of  Flight-Pass  Up  Procedures 
Seek  a  Track  in  Perceptions  List 
CRC  Actions  On  Loss  Of  Target  Condition 
BOC  Ponders  Loss  of  All  Engagement  Possibil¬ 
ities 

Handles  Zero  Priority  Tracks  in  Adil 
Battery  Decisions  To  Cease  Engagement 
Cancel  Allocations 
Return  Track  to  Adil 

Reposition  Entry  in  Doubly  Linked  List' 

Seek  New  Engagement  For  a  Fire  Unit 

Air  Defense  Unit  Ponders  Trackability  of  TGT. 

Refills  Adil 

Allocate  Fire  Unit  Against  Red  Flight 
Allocate  Patriot  Against  Red  Flight 
El imi nate  Oi 1  Entry 
Cancel  Pending  Actions  for  Track 
Actions  Carried  Out  When  CRC  Dies 
Commo  Block  Out  Of  Units  Near  Nuke  Blast 


Communi cati ons 


COMMO  -  Controls  Communications  Processes 


Air  To  Air  Combat 

DOGFITE  -  Controls  Air-To-Air  Combat  Processes 

DESTROY  -  Actions  Taken  When  Unit  is  Destroyed 


27 


Surface 

To  Air 

Engagement 

ENGAGE 

- 

Controls  Surface-to-Ai r  Engagement 

TRYSHOT 

- 

Determine  if  a  Missle  can  be  Fired 

BATCEAS 

- 

Battery  Decision  to  Cease  Engagement 

BNLALLE 

- 

BOC  Ponders  Loss  of  all  Engagement  Possibil¬ 

ities 

FIRECHK 

- 

Fire  Missile  Operations 

AMMOCHK 

- 

Account  for  Missiles 

BYNOTRO 

- 

Battery  not  ready  for  action 

DILOUT 

- 

Eliminate  Oil  Entry 

Ai rcraft 

Movement 

FLY 

- 

Controls  Aircarft  Movement 

VOLLOAD 

- 

Places  a  Unit  on  a  Hex's  Unit  Occupancy  list 

FVELCHK 

- 

Checks  Fuel  Level 

FLTWYPE 

- 

Wipeout  Flight  Action  Order  List 

SKRKILL 

- 

Shurad  Engages  Flights 

INTRFLY 

- 

Process  Flight  Actions  at  Decision  Points 

INTRFLY 

- 

Interceptor  Flight  Decisions 

TGTHEX 

- 

Calculate  Interception  Point  for  Two  Aircraft 

COMMAND 

- 

Flights  carry  out  orders 

DESTROY 

- 

Action  taken  when  Unit  is  Destroying 

Determi nati on 

Of  Unit  Proximity 

NAYBOR 

- 

Controls  Determination  of  Unit  Proximity 

Unit  Perception 

PERCEPT 

- 

Controls  Unit  Perception  Process 

ABSEE 

- 

Airbase  Perception 

CFLYCRC 

- 

CRC  Perceptions  Module  Control 

CRCSEE 

- 

CRC  Message  and  Event  Perception 

CRCEVNT 

- 

CRC  Direct  Perceptions 

DETECT 

- 

Detection  Logic  between  Two  Units 

LOSRADR 

- 

Radar  Line  of  Sight  Determination 

CRCTRAK 

- 

CRC  Actions  on  Enemy  Detection 

CRCKIl 

- 

CRC  Records  Oeath  Report 
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BABMOVE 

- 

CRC  Records  Red  Flight  Movement 

TGTHEX 

- 

Calculate  Interception  Point  for  Two  Flights 

NEWMQVE 

- 

CRC  New  Flight  Perception  Actions 

FLYSEE 

- 

Flight  Perception  Module  Control 

ATKASES 

— 

Air  Attack.  Damage  Accessment  on  Ground 

Targets 

CRCZINT 

- 

Interceptors  Receive  Messages  from  CRC 

RONDSEE 

- 

Flight  Perception  of  Rendevous 

GNDLQQK 

' 

Flight  Perception  and  Attack  of  Ground 

Targets 

SAMSEE 

- 

Sam  Perceptions  Module  Control 

SAMPRCM 

- 

Sam  Perceives  Aircraft  Movement 

BYTKCHK 

- 

Battery  Tracking  Operations 

TOAD  I L 

- 

Try  to  Refill  Adil 

NEWPERC 

- 

Create  Perceptions  List  Entry 

BYPASUP 

- 

Battery  Passes  Track  up  to  BOC 

BYENOPS 

- 

Battery  End  of  Flight-Pass  Up  Procedures 

CRCLOSS 

- 

CRC  Actions  on  Loss  of  Target  Condition 

DROPPOS 

- 

Battery  Considers  Drop  Possibility 

SEEKENG 

- 

Seek  New  Engagement 

OROPP32 

- 

Battery  Considers  Drop  Possibility  2 

DLYACT 

- 

Ada  Action  to  Delayed  Action  Queve 

ALLOBAT 

- 

Allocate  BYRY  against  Red  Flight 

PRIORITY 

- 

Calculate  Priority  of  Track 

BNLALIE 

- 

BOC  Ponders  loss  of  All  Engagement  Possibili- 

ties 


Red  Threat  Planning 
See  Secti m  ( 1 1 F . 2) 


Unit  Information  Processinc 


PONDER 

TFLYCRC 

CRCTHNK 


Controls  Unit  Information  Processing 

CRC/Flight  Ponder  Module  Control 

CRC  Decisions  on  Receipt  of  Information 
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CRCKIL  -  CRC  Records  Death  Report 

CRCTRAK  -  CRC  Actions  on  Enemy  Detection 

CRCLOSS  -  CRC  Actions  on  Loss  of  Target  Condition 

AB2CRC  -  CRC  Interprets  Message  from  Airbase 

INT2CRC  -  CRC  Interprests  Message  from  Flight 

DETECT  -  Detection  Logic  Between  Two  Units 

BTN2CRL  -  CRC  Interprets  Message  from  BOC 

AIRTHNK  -  Ponder  Decision  to  go  into  Air  Combat 

DOGTHNK  -  Ponder  Next  Actions  After  Air  to  Air  Combat 

GOTOAB  -  Actions  on  Return  Flights  to  Airbase 

FUELCHK  -  Check  Flight  Fuel  Level 

BOCTINK  -  BOC  Ponders  Situation 

BNPONSS  -  BOC  Ponders  Subordinate  Status  Message 

BNPONBB  -  BOC  Ponders  BTRY  Back  In  Action 

FILERUP  -  Refuel  Aircraft 

INRANGE  -  Determine  Time  Period  that  Target  is  in  Range 

AZILIM  -  Inpose  Azimuth  Limits  on  Engage  Window 

INSECT  -  Calculate  Intersection  with  Sector  Limits 

SETASSN  -  Set  Up  for  Possible  ADV.  Assignment 

PRIORTY  -  Calculate  Priority  of  Track 

SEEKENG  -  Seek  New  Engagement 

DLYACT  -  Add  Action  to  Delayed  Action  Queve 

BYUPDAT  -  Update  Battery  Status 

BNNOTRD  -  BOC  Not  Ready  For  Action 

DILOUT  -  Eliminate  OIL  Entry 

BATTOUT  -  BTRY  Decisions  to  Drop  an  Enemy  Track 

BNLALLE  -  BOC  Ponders  Loss  of  All  Engagement  Possibili¬ 

ties 

CHKLAST  -  Determine  Last  Chance  for  Engagement  and  Set 

Priori ty 

DROPPOS  -  BTRY  Considers  Drop  Possibility 

COVAPLY  -  Cover  Threat  Allocation  Decisions 
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SEEKTAC 

- 

Seek  to  Assign  Coverage 

ALLOBAT 

- 

Allocate  BTRY  against  Red  Flight 

READ I L 

- 

Return  Track  to  Adi  1 

DECRALO 

- 

Decrease  Allocations 

BNPONEP 

- 

BOC  Ponders  Engagement  Progress 

SKSBTRK 

- 

Seek  Reporting  Subordinate  and  Track 

BNCMDPR 

- 

BOC  Command  Decision  Processes 

ACCEPT 

- 

BTRY  Accepts  Assignments 

BYALCOV 

- 

BTRYs  Alter  Coverage  Level 

CANCALO 

- 

Cancel  Allocations 

SEEKTFV 

- 

Seek  New  Engagement  for  a  Fire  Unit 

PATDEC 

- 

Patriot  Decrease  Coverage  on  Track 

BATTCOV 

- 

BTRY  Decision  to  Allocate  Coverage  on  Track 

TRKCHEK 

- 

Ponder  Trackability  of  Flight  Target 

ALLOFV 

- 

Allocate  Fire  Unit  Against  Red  Flight 

DLYACT 

- 

Add  Action  to  Delayed  Action  Queve 

BYHEDUP 

- 

BTRY  Handle  Engagement  Data  Update 

SEEKP 

- 

Seek  Track  in  Perceptions  List 

BNPONFD 

- 

BOC  Ponders  Flight  Attrition 

SOIGEST 

- 

Sam  Process  Information 

BNNWTRK 

- 

BOC  Handles  Newly  Visible  Track 

CHKCOV 

- 

Check  for  Coverage 

8YNWTRK 

- 

BTRY  Handles  Newly  Visible  Track 

PREPAFU 

- 

Prepare  for  Allocation  of  Fire  Units 

AUTOPRI 

- 

BTRY  Decision  of  Target  Priority 

BNCONTC 

- 

30C  Considers  Change  in  Track 

BNCQNHD 

- 

BOC  Considers  New  Heading 

BNRECOV 

- 

BOC  Considers  Reducing  Coverage 

BYCONTC 

- 

BTRY  Considers  Change  in  Track 

BYCONLS 

- 

BTRY  Considers  Loss  of  Track 

8ATCEAS 

- 

BTRY  Decision  to  Cease  Engagement 

BNPONOA 

- 

BOC  Processes  Delayed  Actions 
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BNPONBD 

SAMATON 

BTRYTNK 

BYCMDPR 

8YPONTM 

BYPONER 

PTPONER 

BYPONFO 

BYPONRL 

BYPONRS 

RESUPLY 


BOC  Ponders  BTRY  Death 

BTRY  Autonomous  Actions 

BTRY  Ponders  Situation 

BTRY  Command  Decision  Processes 

BTRY  Ponders  Track  Movement 

BTRY  Ponders  Engagement  Results 

Patriot  Ponders  Engagement  Results 

BTRY  Ponders  Red  Movement 

BTRY  Ponders  Reload 

BTRY  Ponders  Resupply 

BTRY  Ponders  Resupply  of  Fire  Units 


Airbase  Operations 


TOWER 
VOLLOAD 
INLTACQ  - 
REDEBRF  - 
WIPEOUT  - 
DESTROY  - 
GOGETEM  - 
CRFLTML  - 
PTRAND 
FLTGEOM  - 
Simultaineous 


Controls  Airbase  Operations 
Places  Unit  on  Hex  Unit  Occupancy  List 
Initialize  Acquisition  Devices 
Process  Flight  After  Landing 
Invalidated  a  Node  on  Leftist  Tree 
Action  When  Unit  is  Destroyed 
Launch  Interceptor  Flights 
Create  Flight  Structures 
Generate  Uniform  Random  Hex 
Calculate  Flight  Geometry 
Event  Control 


UMPIRE 

DESTROY 

NUKBLND 


Controls  Simultaineous  Events 
Action  When  Unit  is  Destroyed 
Commo  Black  out  of  Units  Near  NUKE  Blast 


Common  Utilities 


ADDBLOK 

CREATE 

OELADD 

DGTSHX 

DROPBLK 


Adds  a  Data  Block  to  the  Top  of  Linked  List 

Create  Unit  SB  and  C2  Data  Structures 

Discrete  Event  Tree  Adder 

Converts  a  Value  to  a  Hex  Number 

Drop  a  Block  from  a  Singly  Linked  List 
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FETCH 

- 

Red  in  Hold  Files 

FINOBLK 

- 

Find  a  Block  in  a  Singly  Linked  List 

FSDUMP 

- 

Print  Out  ISPACE  Contents 

FSINIT 

- 

Free  Space  Control  Initialization 

GETHEX 

- 

Find  or  Create  a  Hex  Data  Block 

GIMME 

- 

Allocate  Storage  Space 

HEXADO 

- 

Adds  Two  Hex  Numbers 

HEXCHZ 

- 

Chooses  Next  Hex  for  a  Flight  to  move  to 

HEXDIST 

- 

Calculates  Distance  Between  Two  Hexes 

HEXINV 

- 

Calculates  inverse  of  a  Hex  Number 

HEXMLT 

- 

Hex  Multipl ication 

HEXMOVE 

- 

Hex  Movement 

HEXMULT 

- 

Hex  Multiplication 

HISTORY 

- 

Records  an  Event  for  the  Postprocessor 

HXOGTS 

- 

Places  a  Hex  Number  in  the  IDIGTS  Array 

HXMLT2 

- 

Hex  Multipl ication 

IJ2HX 

Converts  I,J  Coordinates  to  Hex 

JUGGLE 

- 

Ships  Hex  Number  to  Usable  Order 

UNEX 

- 

Determines  Intersection,  of  Two  Lines 

INPLOT 

- 

Prints  a  Line  on  the  Output  File 

LOADPL 

- 

Loads  the  Players  List 

LTREE 

- 

Merges  a  Node  on  the  Leftist  Tree 

LTRMRG 

- 

Merges  a  Node  on  the  Leftist  Tree 

MESAGE 

- 

Prints  a  Message  on  the  Output  File 

PACK 

- 

Packs  Two  Halfword  Fields  (non-midas) 

PAGE 

~ 

Adds  Target  Blocks  to  the  Potential  Target 

Tree 

PELAOO 

Adds  Target  Blocks  to  the  Potential  Target 

Tree 

PTREE 

- 

Extracts  a  Block  from  the  Target  Tree 

PTRMRG 

- 

Sorts  Target  Tree 

RITEI 

- 

Prints  an  Integer  Value 
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RITEP 

- 

Prints  a  Pointer  Value 

RITER 

- 

Prints  a  Real  Value 

UNPACK 

- 

Unpacks  Two  Halfwords  (non-midas) 

UNLINK 

- 

Removes  a  Dead  Unit  from  the  C2  Tree 

YANK 

- 

Removes  an  Entry  from  a  Doubly  Linked  List 

STICK 

- 

Inserts  an  Entry  in  a  Doubly  Linked  List 

NOWUCIT 

- 

Hex  Peeper  List  Update 

GETPTRS 

- 

Gets  Required  Pointers 

MESBILD 

- 

Builds  a  Message  Structure 

UNSTAT 

Unpacks  an  Aircraft  Flight  Status  Board  into 

a  Common 

STATPAK 

““ 

Repacks  an  Aircraft  Flight  Status  Board  after 

it  has  been  Updated 

SSL 

- 

Sorts  a  Singly  Linked  List 

INSERT 

- 

Inserts  an  Entry  into  an  Ordered  Linked  List 

RELOCAT 

- 

Reposition  Entry  in  Doubly  Linked  List 

Postprocessor 

Functions  And  Subroutines 

The  following 

1  i  st 

summariezes  functions  carried  out  by  various 

postprocessor  subroutines.  For  a  complete  calling  hierarchy  and  detailed 
subroutine  documentation  see  Appendices  I  and  J  and  the  Source  Code. 


(1) 

RECORD 

- 

Main  Control  Routine 

(2) 

INDEX 

- 

Finds  Desired  Index  in  a  Storage  Array 

(3) 

MESAGE 

- 

Prints  a  Message  on  the  Output  File 

(4) 

PAGE 

- 

Advances  Output  Page 

(5) 

RITEI 

- 

Prints  an  Integer  Value 

(6) 

RITER 

- 

Prints  a  Real  Value 

(7) 

TABOUT 

- 

Prints  Contents  of  Storage  Arrays 
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CHAPTER  III 


DATA  STRUCTURE  DOCUMENTATION 


A.  INTRODUCTION 

MADEN  uses  a  list  processing  system  to  store  data.  Information  is 
stored  in  the  dynamically  allocated  array  ISPACE  in  a  series  of  data 
structures.  These  data  structures  are  composed  of  blocks  linked  in  a 
variety  of  configurations  (eg.,  trees,  lists,  etc.)  by  pointers.  Each 
block  is  made  up  of  a  specified  number  of  words.  In  many  cases  words 
are  divided  into  fields  which  contain  descrete  pieces  of  information. 

The  pointers  which  connect  blocks  into  data  structures  are  actually 
addresses  in  the  one  dimensional  army  ISPACE.  Since  the  number  and 
configuration  of  blocks  stored  in  ISPACE  changes  during  model  execution, 
the  storage  system  is  said  to  be  dynamic.  ISPACE  is  currently  limited 
to  131,000  words  of  storage. 

Sections  B  through  G  of  this  manual  document  the  common  blocks  and 
data  structures  used  by  MADEM.  Table  1 1 1- 1  provides  a  cross  reference  of  data 
block  types  and  the  sections  of  this  manual  in  which  they  are  discussed. 

Since  these  blocks  are  defined  and  accessed  using  the  Modular  Information 
Data  Access  System  (MIDAS),  documentation  of  MIDAS  and  the  tables  us*ed  to 
define  the  data  blocks  have  been  included  in  Appendices  B  and  D.  In 
addition,  Table  1 1 1-2  provides  an  outline  of  the  standard  data  structure 
documentation  format  used  in  this  manual. 
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TABLE  III-l.  DATA  BLOCK  DOCUMENTATION  CROSS  REFERENCE  (CONTINUED) 


G. 7BTRY _ 

G  8  PASSIVE  TGT 

H.  STORAGE 


TABLE  1 1 1-2.  STANDARD  DATA  STRUCTURE  DOCUMENTATION  FORMAT 


B.  COMMON  BLOCKS 


(1)  COMMON/AAPK/  -  air-to-Air  PK  Common 

AAPK  -  antiaircraft  probability  of  kill 

(2)  COMMON/ACFRAG/  -  AIRCRAFT  FLIGHT  Plan  Common 

NSECTOR  -  Corridor  Zone  Number 

PTGTHEX  - 

PAORCG 

PHEXENT  - 

TATREND 

PHEXEXT  - 

(3)  COMMON/AFM/  -  Debugging  common  for  7TRACE?  JINX  - 

(4)  COMMON/AGPO/  -  Air  to  Ground  Probability  of  Detection  AGPD 

(5)  COMMON/AGPK/  -  Air  to  Ground  Probability  of  kill  AGPK  - 

(6)  COMMON/CLOOK/  -  Common  for  dumping  COMMONS 

ISTABL 
NRSRV 
I  STAB 

(7)  COMMON/COMOUT/  - 

LBL 

LBLCT 

(8)  COMMON/COMPTR/  - 

PHXTOP  -  pointer  to  top  of  address  tree 

PTRBLUE  -  pointer  to  top  of  blue  C2  tree 

PTRRED  -  pointer  to  top  of  red  C2  tree 

PBLTGT  -  pointer  to  top  of  list  of  red  targets 

PTRC2  -  pointer  to  active  C2  tree 

PBLUPL  -  pointer  to  blue  players  list 

PREDPL  -  pointer  to  red  players  list 

PTRPL  -  pointer  to  active  players  list 

PLASTC  -  C2  pointer  of  last  mentioned  commander 

PLASTS  -  C2  pointer  of  last  mentioned  subordinate 

LSIDE  -  Active  side  (1  =  Blue,  2  =  red) 
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LHEX  -  last  hex  mentioned 

PTRCDB  -  last  mentioned  corridor  description  pointer 

PTRWDB  -  last  mentioned  wave  description  pointer 

PTRRDB  -  last  mentioned  raid  description  pointer 

PTRTTDB  -  last  mentioned  target  type  description  pointer 

BUFZN  -  buffer  zone  width  value 

IGMSRT  -  game  hour  start  time,  default  =  1 

IDYSRT  -  game  day  start  time,  default  =  1 

PTRDATA  -  pointer  to  data  base 

PTOPORD  -  pointer  to  red  orders 

PREDSEE  -  pointer  to  red  commanders  perception  list 

ISIZE  -  size  of  player  list  array,  equal  to  maximum 

number  of  players  on  largest  side 

(9)  COMMON/COMSCS/  - 

LMASK  -  bit  mask  for  left  hand  side  of  a  ward 

RMASK  -  bit  mask  for  right  hand  side  of  a  ward 

INITCEL  -  initialize  the  cell  (currently  not  used) 

TREETOP  -  top  of  the  discrete  event  list 

ENDTIME  -  end  of  the  game 

INCTIME  -  increment  of  time  for  interim  output 

GTIME  -  game  of  current  discrete  event 

CELMINT  -  increment  time  for  cell  event 

LPTR  -  array  of  pointers  to  cell  events 

(10)  CQMMON/CRCCQM/  - 

IE'.'ENT  -  CRC's  current  event 

PSB  -  pointer  to  the  scoreboard 

PADR  -  pointer  to  hex  address 

ITYPE  -  unit  type 

I  SIDE  -  multiple  definitions 

(11)  COMMON/CSTK/  -  Language  Processor 

IPSTK  -  stack  used  by  language  processor 

L 

UMAX 

NSTK 
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(12)  COMMON/DATA/  - 

PTRDAT 

(13)  COMMON/DEBUG/ 

DBGA 

OBGB 

DBG 

DBGD 

(14)  COMMON/DFLAGS/  - 

IDE8UG  -  a  flag  which  turns  on  ENTRYP  and  EXITP.  If 

equal  to  2H0N  turns  on  entry  and  exit  messages 
for  all  routines 

IDUMP  -  ISPACE  dumping  option  flag,  set  as  a  parameter 

in  MADEM  if  set  equal  to  2H0N,  ISPACE  will  be 
dumped 

IDATFLG  -  DATFILE  display  flag,  set  as  input  parameter 
in  MADEM  ZHON  -  will  display  DATFILE  data 
data  structure  only  in  INITBIN 
ISTOP  -  input  parameter  set  in  MADEM 

if  equal  to  4H0DAT  stops  after  UOIL  (can  ue  used 
to  get  ISPACE  dump  before  players  list  is 
released) 

if  equal  3HDEL  stops  INITBIN  after  DELADD  and 
before  CONTROL 

(15)  COMMON/XTRACE  - 

ITRPTR  -  Pointer  to  circular  list 

TRACIR  -  circular  list  of  last  50  routine  entries 

TRAPTR  -  pointer  to  routine  pushdown  stack 

TRAPDS  -  push  down  stack  of  routine  entries 

ICOUNT  -  vector  of  routine  entry  counts 

(16)  COMMON/STEXT/  - 

SEGTXT  -  vector  of  routine  names  in  hollerith 
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(17)  COMMON/FS/ 

PTRFS 

PTRRSL 

MXSPCE 

ID 

(18)  COMMON/HALT/  - 

IF STOP 
CPULIM 
CELTIME  - 
LEVEL 

(19)  COMMON/ IN ITPTR/- 

PTRADR 

PPTRC2 

PTRSDB 

PTRFEL 

PTRACQ 

PTRCOM 

PTRSTAT  - 

PTRSEE 

PTRSUB 

PTRORD 

MYTYPE 

MYSIDE 

(20)  COMMON/IODEV/  - 

IN 

NUOIL 

NO 

(21)  COMMON/ JJOPT/  - 

IOP 


pointer  to  first  ward  of  free  space 
pointer  to  recovered  storage  list 
maximum  length  of  ISPACE,  set  in  MADEM 
last  Assigned  Player  ID  Number 

a  flag,  if  equal  to  1,  MADEM  stops  in  control 
maximum  number  of  CPU  second  set  in  MADEM 

All  major  values  from  Player  SB. SOB 
PTR  to  current  address 
PTR  to  C2  node 

pointer  to  status  display  board 
pointer  to  future  event  list 
-ointer  to  ACQDEVICE  block 
pointer  to  command  block 
Pointer  to  a  unit  status  block 
pointer  to  perceptions  list 
pointer  to  a  subordinate  block 
pointer  to  orders  block 
Player  unit  type 
player  side 

device  number  of  input  file 
device  number  of  UOIL  file 
device  number  of  DATFILE 

start  or  restart  option  flag 

if  equal  to  1  start  at  beginning  (INITBIN) 

if  equal  to  2  restart  (RUNBIN) 


(22)  COMMON/LIMIT V  -  Max  &  Min  limits  on  ISPACE 

LOWER  -  Extend  core  location  of  ISPACE  (1) 

LUPPER  -  extended  core  location  of  last  work  of  ISPACE 

(23)  COMMON/MASK/  - 

IL  -  masking  constant 

=  77777777770000000000B 
ILM  -  masking  constant 

=  10000000000B 

(24)  COMMON/MODVAR/  - 

INCDNT  -  incident  code  (event  code) 

NEHMEN  -  receiver  of  the  event 

LASSEN  -  schedules  of  an  event 

TIME  -  game  time  of  tne  scheduled  event 

MSG  -  Pointer  to  the  message  block 

PTRGOO  -  PTR  to  a  god  like  creature  whose  omnipitence 

awes  all  who  meet 
RSEED  -  random  seed 

(25)  COMMON/MXMIS/  - 

MXSUP 

(26)  COMMON/PATH/ 

LASTP 

LREP 

LASTR 

(27)  COMMON/SAMPK/  - 

SAMPKA  -  SAM  probability  of  kill 

SAMPKB  -  SAM  probability  of  kill 

(28)  COMMON/SAMPTRS/- 

PMYDATA  -  pointer  to  data  base  associated  with  considered 
unit 

PDIL  -  pointer  to  element  in  digested  information  list 

which  corresponds  to  a  particular  considered 
f 1 i ght 
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PPPINFOR  - 

POINFO 

PO INFO 

PBAT 

PPAL 

PFU 

(29)  COMMON/SEMI NFO/- 

IVALUE 

IFLAG 

(30)  COMMON/SPACE/  - 

BLANK 

ISPACE 

(31)  COMMON/SPSTAT/  - 

ICIGIM 

ICTREL 

(32)  CQMMQN/STATBQ/  - 

PFLTTYP 

PTRMUN 

PTRSTRT 

PTRENO 

PTRNXT 

PTRAB 

NUMTGT 


pointer  to  considered  perception  list  entry 
for  battery  or  BOC 

pointer  to  considered  digested  information 
block  for  battery  or  BOC 

pointer  to  old  digested  information  block  for 
battery  or  BOC 

pointer  to  SUBLIST  block  representing  a  par¬ 
ticular  subordinate  BOC 
pointer  to  PAL  entry  for  track 
pointer  to  fire  unit  block 

an  array  which  holds  real  number  from  the 
SEMANT  sentences 


requi red! 


counts  the  number  of  blocks  by  block  size  that 
GIMME  allocates 

counts  the  number  of  blocks  by  block  size 

that  are  released  by  RELEASE 

AIRCRAFT  STATUS  Board 

pointer  to  Flight  DATA  BASE 

pointer  to  MUNITIONS  list 

pointer  to  start  hex  of  leg 

pointer  to  end  hex  of  leg 

pointer  to  next  hex  in  flight  path 

pointer  to  SB  of  home  3 

number  of  aircraft  in  nr-to-air  track 
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PTGTS8  -  pointer  to  air-to-air  target  SB 

PGNDTGT  -  pointer  to  ai r- to-ground  target  SB 

NUMAC  -  number  of  aircraft  in  flight 

LEGSTA  -  type  of  leg  currently  being  blown 

INSTA  -  status  of  interceptor 

ITALTCNG  -  climbing,  diving  level 

NDXPROF  -  index  into  flight  profile  list 

LNDSTA  -  landing  status 

IORBSTA  -  orbit  status 

IAIRCOM  -  air-to-air  combat  status 

IGNDATK  -  air-to-ground  combat  status 

JAMSTA  -  jammer  status 

FUEL  -  current  fuel  in  of  hexes 

ALTUDE  -  current  altitude 

SPEED  -  current  speed 

DIRECT  -  current  heading 

(33)  COMMON/THTRPLN/- 

PFOREST  -  pointer  to  target  list 

PNOAVAL  -  pointer  to  non  available  target  list 

(34)  COMMON/TRACK/  - 

PFADR 

ISID 

(35)  COMMON/TYPES/  - 

IARRAY 

(36)  COMMON/OUTDEV/  - 

OUTDEV  -  output  device  for  data  structure  displays 


C.  DATA  BASE  STRUCTURE  -  DATFILE 

1 .  Data  Block  Index 

ACDB 

ABQUEDB 

ACRFTLIST 

ACRFTONAB 

ADSITEDB 

AQDB 

DATBLOK 

DATBUF 

FDBDBLOK 

FLTDB 

FMFLTDB 

PAYBUF 

PAYLOAD 

PAYLDBLOK 

PROFILEDBLOK 

2.  Description 

The  DATFILE  data  structure,  built  by  subroutine  OTHRDAT,  contains 
only  data  from  the  MADEM  input  file  'DATFILE'.  The  DATFILE  data  is  divided 
into  13  classes.  Nine  of  these  classes  (classes  6026,  6001-6008)  are  stored 
in  the  DATFILE  data  structure.  The  other  four  classes  are  in  common  blocks. 

The  DATFILE  data  structure  is  a  matrix  of  linked  lists  that  includes 
15  distinct  data  blocks.  Fourteen  of  those  data  blocks  point  to  themselves 
and  thus  are  singly  linked  lists.  The  only  block  that  is  not  part  of  a  linked 
list  is  the  one  word  buffer  (DATBUF)  at  the  top  of  the  DATFILE  structure. 

The  main  linked  list  in  DATFILE  consists  of  nine  occurrences  of 
DATBLOK.  Each  occurrence  is  a  two-word  buffer  block  for  one  of  the  nine 
classes  of  DATFILE  data  that  are  stored  in  DATFILE.  Each  two-word  buffer 
points  to  a  data  block  specific  that  class  (6000  SERIES).  Some  of  those 
data  blocks  point  to  even  more  linked  lists.  See  the  diagrams  for  a  better 
picture  of  DATFILE. 
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Structure  Overview 

a.  Structure  Diagram 

b.  Block  Definitions 

OATBUF 


DATBLOK 


AOSITEDB 

(Class-6026) 


EDBOBLQK 

(Class-6001) 

FMFLTDB 

(Class-6001) 

FLTDB 

(Class-6002) 

PAYLOAD 

(Class-6002) 

ACDR 

(Class-6003) 

PAYBUF 

(Class-6004) 

PAYLDDBLOK 

(Class-6004) 


(See  Figure  III-l) 

Data  Base  Buffer  Block.  Top  of  entire 
(DAFILE)  structure.  Pointed  to  by  PTRDATA 
in  common  COMPTR. 

Data  Class  Block.  Top  of  DATBLOK  list 
pointed  to  by  DATBUE  block.  One  DATBLOK 
block  for  each  data  class  (6000  SERIES). 

Air  Defense  Site  Data  Base  Block.  Used 
to  describe  BOC  and  Battery  character¬ 
istics.  One  block  for  each  type  of  BOC 
and  Battery  (e.g..  HAWK,  HERC,  PATRIOT). 
Formation  Data  Base  Block.  Formation 
description.  One  block  for  each  formation 
type. 

Formations  Flight  Data  Base  Block. 

Describes  flights  in  the  formation  referred 
to  in  the  EDDBDBLOK  blocks. 

Flight  Data  Base  Block.  Contains  basic 
flight  characteristics.  One  block  for 
each  flight. 

Payload  Data  Base  Block.  Contains  basic 
information  on  payload  capacity  and  range. 
Aircraft  nata  8ase  Block.  Contains  basic 
aircraft  characteristics.  One  block  for 
each  aircraft  type,  Red  and  Blue. 

Payload  Type  Buffer  Block.  Buffer  block 
for  PAYLDDBLOK  blocks.  One  block  for 
each  payload  type. 

Payload  Identification  Block.  Contains 
specific  payload/weapon  code.  Represents 
a  particular  weapon  of  a  given  type. 
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PROFILEDBLOK  Profile  Specification  Block.  Describes 

(Class-6005)  basic  mission  profile  in  terms  of  altitude 
on  various  legs  of  the  mission. 

AQDB  Acquisition  Data  Base  Block.  Specifies 

(Class-6006)  acquisition  range  for  a  given  device. 
ABQUEDB  Air  Base  Queue  Data  Base  Block.  Service 

(Class-6007)  queue  information  for  air  bases.  One 
for  each  air  base. 

ACRFTONAB  Initial  Aircraft  on  Air  Base  Block. 

(Class-6008)  Specifies  number  of  aircraft  types  on  an 

air  base.  One  for  each  air  base,  Red 
and  Blue. 

ACRFTLIST  Aircraft  List  Block.  One  for  each  aircraft 

(Class-6002)  type.  Pointed  to  by  ACRFTONAB.  Contains 
aircraft  type  code. 


3)  ADSITEDB 


5) 


PNEXT 


ADTYPE 


M0DVAL1 


MAXNUMDIGEST 


MAXTIMEDIGEST  MINTIMEDIGEST 


LOSTIME  (SPACE) 


LASTCHANCE  (SPACE) 


ENGAGEWINDOW( S  PACE ) 


MODVAL2  (SPACE) 


MODVAL3  (SPACE) 


COVONONE 


COVONFEW 


COVONMANY 


ONE 


FEW 


MANY 


TIMEFLIGHT( SPACE) 


MISSILERANGE( SPACE) 


MAXASSIGN 


M0CVAL4 


MODVAL5(SPACE) 


MAXTRACTRANGE(SPACE') 


LOCKONTIME( SPACE) 


MODVAL6( SPACE) 


MODVAL7 ( SPACE) 


CONVLOAD 

SNUKELOAD 

LNUDELOAD 

RESUPPLYCV 

CVRESUPPLYFREQ 

RESUPPLYSN 

SNRESUPPLYFREQ 

RESUPPLYSN 

LNRESUPPLYFREQ 

FDBDBLOK 

PNEXT 

NRFORM 

PTRFLT 

NOFLTL=3 

SPFORMC 

FMFLTDB 

PNEXT 

PNXFLDB 
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6)  FLTDB 


9) 


PNXFLDB 

NRFLITE 

PTYPLDS 

NOPYLDS 

PTYAQDB 

PTACDB 

MAXNOAC 

MINNOAC 

MULTAC 

PROFILE 

SPFLTC(SPACE) 

DISTSEP(SPACE) 

PAYLOAD 

PNXTYPD 

NRPDCLS 

MAXAMT 

MINAMT  , 

MAXFIRERANGE 

PAYLDDB 

8)  ACDB 


NEXT 


NRACTYPE 


MAXSPEED(SPACE) 


CRUISESPEED(SPACE 


MAXALTITUOE( SPACE) 


MINALTITUDE( SPACE) 


MAXCLIMBDIVE (SPACE) 


FUELCONSUME( SPACE) 


ACQRANGE(SPACE) 


RADARCS(SPACE) 


ATTACKRADIUS(SPACE) 


PAYBUF 

PNEXT 

NRPDCLS 

PAYLDDB 

NUMBLOK 

10)  PAYLDDBLOK 


NEXT 


TYPEINDEX 


11)  PROFILEOBLOK 


PNXPRDB 


NRPROFL 


AITCREW(SPACE) 


ALTOTGT ( SPACE ) 


ALTDAB(SPACE) 
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b. 


NEXT 

NRAQTYP 

RANGE(SPACE) 

N0USE1 

N0USE2 

13) 

ABQUEDB 

PNEXT 

CLASS 

VALUE1 (SPACE) 

VALUE2(SPAC£) 

VALUE3($PACE) 

14) 

ACRFT0NAB 

PNEXT 

ABID 

ACRFTLIST 

NUMBLOKS 

15) 

ACRFTLIST 

PNEXT 

r 

ACRFTID 

NUMACRFT 

F0RMTYPE 

Field  Definitions 

1) 

DATBUF  Block 

PDATBLK 

Pointer  t 

NUMBL0K 

Number  of 

2) 

DATBLOK  Block 

PNEXT 

CLASS 


Pointer  to  next  DATBLOK  block. 
DATFILE  class  (6000  SERIES). 

6026  =  Air  defense  site  data 

6001  =  Formation  specifications 

6002  =  Flight  speci fications 

6003  =  Aircraft  specifications 

6004  =  Payload  specifications 

6005  =  Flight  profile  specifications 

6006  =  Acquisition  device  data 

6007  =  Air  base  queue  data 

6008  =  Initial  aircraft  types  on  air 

bases 
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PCLASS 


Pointer  to  first  data  block  for  the 
class.  The  actual  data  block  varies 
from  class  to  class. 

NUMBLQK  Number  of  data  blocks  in  list  pointed 

to  by  PCLA. 

3)  ADSITEDB  Block 

PNEXT:  Pointer  to  next  ADSITEDB  block. 

ADTYPE:  Unit  type  of  this  unit,  must  be  a  BOC  or  BTRY. 

M00VAL1:  Model  Value  =  1 

MAXNUMDIGEST:  Maximum  number  of  flights  on  which 

a  BOC  or  BTRY  can  be  digesting  info 
at  one  time. 

MAXTIME  DIGEST:  Maximum  time  (in  seconds)  between 

consecutive  digests  of  info  (BOC  & 
BTRY). 

MINTIME  DIGEST:  Minimum  time  (in  seconds)  between 

consecutive  digests  of  info  (BOC  & 
BTRY). 

LOSTTIME:  Time  (in  seconds)  after  which  a  track 

not  seen  is  assumed  permanently  lost 
(BOC  &  BTRY). 

LASTCHANCE:  Time  (in  seconds)  considered  short 

for  a  subordinate  to  respond  to  a 
target.  (Time  from  now  until  his 
last  chance  to  shoot. )  BOC  only, 
for  BTRY  =  0. 

ENGAGEWINDOW:  Minimum  length  of  subordinates 

engagement  window  for  a  significant 
engagement  opportunity  in  seconds 
(BOC  &  BTRY). 

M0DVAL2:  Model  value  =  0 

M0DVAL3:  Model  value  =  0 

C0V0N0NE:  Desired  number  of  fire  units  coverage 

for  one  aircraft  (BOC  &  BTRY). 
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ONE: 

COVONFEW: 


COVONMANY: 


MANY: 

TIMEFLIGHT: 

MISSILERANGE: 

MAXASSIGN: 


M0DVAL4: 

MODVAL5: 

MAXTRACKRANGE: 

LOCK  ON  TIME: 


MODVAL6 : 

MODVAL7: 

CONVLOAD: 

SNUKELOAD: 

LNUKELOAO: 

RESUPPLYCV: 

CVRESUPPIYFREQ: 


Model  value  =  1 

Desired  number  of  fire  units  coverage 
for  few  aircraft  (BOC  &  BTRY). 

Model  value  =  5,  number  of  aircraft 
considered  "few." 

Desired  number  of  fire  units 
coverage  for  many  aircraft  (BOC  & 

BTRY). 

Model  value  =  1000000. 

Maximum  time  (in  seconds  of  flight 
for  missile  (BOC  &  BTRY). 

Maximum  range  for  missiles  in  meters 
(BOC  &  BTRY). 

Maximum  number  of  targets  per  ready 
fire  unit  to  be  assigned  at  one  time. 

BOC  only,  BTRY  =  0. 

Model  value;  for  BOC  =  8,  for  BTRY  =11. 
Model  value  0. 

Maximum  tracking  range  in  meters. 

BTRY  only,  BOC  =  0. 

Assumed  time  (in  seconds)  for  BTRY 
to  achieve  lockon.  BTRY  only,  BOC 
=  0. 

Model  value  =  0. 

Model  value  =  0. 

Number  of  Conventional  missiles. 

Number  of  large  nukes. 

Number  of  large  nukes. 

Number  of  missiles  per  resupply  of 
ammo.  BTRY  only,  BOC  =  0. 

Time  (in  seconds)  between  resupply 
of  conventional  ammo.  BTRY  only, 

BOC  =  0. 
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RESUPPLYSN: 


RESUPPLYLN: 

LNRESUPPLYFREQ: 

4) .  ADSITEDB  Block 

PNEXT: 

NRFORM: 

PTRFLT : 

NOFLTL: 

SPFORMC: 

5)  FMFLTOB  Block 
P NEXT: 

PNXF1DB: 

6)  FLTDB  Block 
PNXFLD8: 

NRFLITE : 

PTYPLDS : 

NOPYLD5 : 
PTYAQDB: 

PTACDB: 

MAXNOAC: 

MINNOAC : 

MULTAC: 

PROFILE: 


Number  of  missiles  per  resupply  of 
small  nukes.  BTRY  only,  BOC  =  0. 
Number  of  missiles  per  resupply  of 
large  nukes.  (BTRY  only,  BOC  =0.) 
Time  (in  seconds)  between  resupply 
of  large  nukes.  BTRY  only,  BOC  =  0. 

Pointer  to  next  FDBDBLOK. 

Formation  number,  must  be  unique. 
Pointer  to  formations  flight  block 
(FMFLTDB). 

Number  of  flights  in  the  formation. 
Formation  cruise  speed  in  meters/ 
seconds. 

Pointer  to  next  formation  flight 
block. 

Pointer  to  flight  data  block  (FLTDB). 

Pointer  to  next  FLTDB  Clock. 

Unique  flight  specification  number. 
Pointer  to  payload  data  block  (Payload 
Class  6002). 

Number  of  payload  data  blocks. 

Pointer  to  acquisition  data  block 
(AQDB,  Class  6007). 

Pointer  to  Aircraft  Specification 
data  block  (ACDB,  Class  6003). 

Maximum  number  of  aircraft  in  flight. 
Minimum  number  of  aircraft  in  flight. 
Multiples  of  aircraft  required  for 
f 1 ight. 

Pointer  to  profile  specification 
data  block  (PR0FILEDBL0K,  Class  6005). 
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7) 


8) 


9) 


SPFLTC: 
DISTSEP: 
PAYLOAD  Block 
PNXTYPD: 
NRPDCLS: 


MAXAMT: 

M IN AMT: 

MAXF I  RERANGE: 


PAYLDDB: 

ACDB  Block 

NEXT: 

NRACTYPE: 

MAXSPEED: 

CRUISESPEED: 

MAXALTITUDE: 

MINALTITUOE: 

MAXCLIMBDIVE: 

FUELCONSUME: 

ACQRANGE: 
RDRARCS: 
ATTACKRADIUS: 
MAX FUEL: 
PAYBUF  Block 
PNEXT: 


Flight  cruising  speed  in  meters/seconds. 
Flight  separation  distance  in  meters. 

Pointer  to  next  payload  block. 

Payload  type,  must  be  3  or  4: 

3  =  air  to  ground 

4  =  air  to  air 

Maximum  number  of  loads  of  this 
payload. 

Minimum  number  of  loads  of  this 
payload. 

Future  use  by  an  enhancement  for 
maximum  fire  range  for  engagements 
greater  than  one  hex. 

Pointer  to  payload  ID  DATA  BLOCK 
(PAYLDDBLOK,  Class  6004). 

Pointer  to  next  ACDB  block. 

Aircraft  type  number. 

Maximum  speed  in  meters/seconds. 

Cruising  speed  in  meters/seconds. 

Maximum  altitude  in  meters. 

Minimum  altitude  in  meters. 

Maximum  climb/dive  rate  in  meters/ 
seconds. 

Fuel  consumption  rate  in  hexes/ 
seconds. 

Acquisition  range  in  meters. 

Radar  cross  section  in  hexes. 

Attack  radius  in  meters. 

Maximum  fuel  load  in  hexes. 

Pointer  to  next  PAYBUF. 
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NRPDCLS: 

Type  of  payload,  must  be  3  or  4: 

3  =  Air  to  ground  4  =  Air  to  air 

PAYLDDB: 

Pointer  to  ID  Blocks  (PAYLDDBLOK, 

Class  6004)  for  this  payload  type. 
Number  of  ID  Blocks  for  this  payload 

type. 

10) 

PAYLDDBLOK  Block 

NEXT: 

Pointer  to  next  ID  block. 

TYPEINDEX: 

Payload  ID,  unique  within  each  payload 

type. 

11) 

PROFILEDBLOK  Block 

PNXPRDB: 

Pointer  to  next  PROFILEDBLOK. 

NRPROFL: 

Profile  Identification  number,  must 

be  unique  within  the  6005  Class. 

ALTCREN: 

Altitude  of  first  leg  in  meters. 

ALTOTGT : 

Altitude  of  second  leg  in  meters. 

ALTOAB: 

Altitude  of  third  leg  in  meters. 

12) 

AQDB  Block 

NEXT: 

Pointer  to  next  AQDB  block. 

NRAQTYP: 

Unit  type. 

RANGE: 

Acquisition  range  in  meters. 

NOUSE1 : 

Not  used. 

NOUSE2: 

Not  used. 

13) 

ABQUEDB  Block 

PNEXT: 

Pointer  to  next  ABQUEDB  block. 

CLASS: 

Queue  Class,  currently  model  value  =  1 

VALUEl : 

Model  value  =  0. 005. 

VALUE2: 

Model  value  =  0. 

VALUE3: 

Model  val ue  =  0.2. 

14) 

ACRFTONAB  Block 

PNEXT: 

Pointer  to  next  ACRFTONAB  block. 

ABID: 

Air  base  ID. 

Pointer  to  aircraft  list  (ACRFLIST) 
for  this  air  base. 

Number  of  aircraft  types  on  this 
air  base.  Limit  1  for  Blue. 


Pointer  to  next  ACRFTLIST  block. 

Type  of  aircraft  (400  Series). 

Number  of  aircraft. 

Formation  type  number. 

*  Required  for  Blue  air  bases. 

*  Equals  zero  for  Red  air  bases. 

5.  Linkages  to  Other  Data  Structures 

The  DATFILE  data  structure  is  self-contained  in  the  sense  that 
none  of  its  member  data  blocks  point  to  blocks  outside  the  DATFILE  structure. 
The  reason  for  this  is  that  the  DATFILE  data  structure  is  merely  a  repre¬ 
sentation  of  the  input  file  DATFILE,  and  thus  needs  no  external  pointers. 

Other  data  structures  and  blocks,  however,  point  to  DATFILE  as 

fol lows: 


ACRFTLIST: 

NUMBLOCKS: 

15)  ACRFTLIST  Block 
PNEXT: 

ACRFTID: 
NUMACRFT : 
FORMTYPE: 


Block 

Points  To 

Comments 

FQRMATIONBLOK 

FDBDBLOK 

To  identify  each  Red 

formation. 

FLTAKTBLOK 

FLTDB 

Once  for  each  Red  flight 

attacking  a  target. 

ACRFTSTATUS 

FLTDB 

Once  for  each  Red  aircraft 

to  identify  its  flight. 

LOAD 

PAYLOAD 

To  identify  an  aircraft's 
payload. 

ABINFO 

ACDB 

Once  for  each  aircraft 

type.  So  that  an  air  base 

has  access  to  aircraft 

specs. 

QUEUES 

ABQUEDB 

Air  base  queue  data  block. 
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The  top  of  the  DATFILE  structure  (OATBUF)  is  pointed  by  by  PTRDATA, 
a  variable  in  common  block  COMPTR. 

6.  Notes 

Three  of  DATFILE' s  bl ocks--DATBUF ,  DATBLOK,  and  PAYBUF--were  not 
in  the  pre-1979  "full"  MIDAS  table.  As  of  August  20,  1979,  however,  plans 
were  to  include  these  blocks  in  the  MIDAS  table. 

The  third  word  of  block  PAYLOAD  is  defined  differently  in  the  MIDAS 
table  than  it  was  used  in  the  non-MIDASed  OTHRDAT  routine.  It  was  a  full 
word  pointer  to  PAYLDDBLOK  but  has  been  redefined  so  that  the  2nd  half  word 
is  that  pointer  and  the  first  half  word  is  the  maximum  firing  range  for 
PAYLOAD.  This  was  done  to  allow  for  a  future  enhancement. 


D.  SIMULATION  CONTROL  STRUCTURES 


The  simulation  control  structures  are  used  to  control  event  processing 
and  movement  within  the  hexagonal  coordinate  system.  Event  processing 
structures  include  the  discrete  event  list  and  future  event  lists.  Hexag¬ 
onal  coordinate  system  related  structures  include  the  hex  address  tree, 
unit  occupance  lists  and  peeper  lists.  These  control  structures  are 
explained  in  detail  in  the  following  subsections. 
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1 .  Event  Lists 

a.  Data  Block  Index 

EVENT 

LEFTREE 

MESSAGE 

b.  Description 

Event  scheduling  in  MADEM  is  carried  out  using  the  three  data 
block  types  listed  above.  These  block  types  are  used  to  build  two  event 
control  data  structures  DEL  and  FEL. 

The  DISCRETE  EVENT  LIST  (DEL)  is  the  most  complex  of  these  structures. 
It  uses  all  three  block  types  to  build  a  leftist  tree  of  the  form  shown  in 
the  structure  diagram  under  the  DEL  label.  The  DEL  structure  is  used  to 
track  all  scheduled  events  with  the  next  event  to  occur  placed  at  the  top 
of  the  tree.  The  leftist  tree  form  is  used  to  speed  sorting  of  the  large 
number  of  events  scheduled  by  the  model.  For  a  complete  explanation  of  leftist 
tree  sorting  algorithms  see  Appendix  E.  It  should  be  noted  that  the  DEL  is 
actually  a  threaded  tree  in  that  the  event  blocks  have  pointer  fields  which 
allow  them  to  be  independently  linked  into  doubly  linked  lists.  This  capa¬ 
bility  is  shown  in  the  structure  diagram  by  the  dotted  lines. 

The  future  event  list  (FEL)  is  a  doubly  linked  list  formed  within 
the  DEL  structure  using  the  threading  capability  described  above.  The  FEL 
is  used  to  keep  track  of  events  scheduled  by  a  particular  player.  This  allows 
future  events  (as  described  by  EVENT,  LEFTREE,  AND  MESSAGE  blocks)  scheduled 
by  a  player  to  be  deleted  from  the  DEL  with  minimal  effort  if  the  player  is 
destroyed  before  these  events  can  occur.  An  example  of  a  FEL  is  shown  in 
the  structure  diagram. 

c.  Structure  Overview 

1)  Structure  Diagram  (Figure  1 1 1 - 2 ) 

2)  Block  Definiti ions 

LEFTREE  -  LEFTIST  EVENT  TREE  NODE.  Contains  time  of 
event  used  for  sorting  and  pointers  which 
connect  the  node  to  the  rest  of  the  tree. 
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Discreet  Event  List  Diagram 


EVENT 


d. 


codes 


EVENT  BLOCK.  Contains  a  description  of  the 
event,  its  time  of  occurrence,  pointers  to 
the  SB  (Scoreboards)  of  the  perpetrator  and 
victim  of  an  event.  MESSAGE.  Contains  message 


associated  with  an  event. 

Block  Specifications 
1 .  Block  Diagrams 
a.  EVENT 


NEHMEN 

INCONT 

PTRUP 

PTRDOWN 

MSG 

LASSEN  TIME  (SPACE) 

b)  LEFTREE 


TIME  (SPACE) 

PREVENT 

DIST 

PLEFT 

PRITE 

Note:  +  indicates  alternate 
field  definition  for  preceding 

1 _ +  VALUE  J _ !  word. 

2.  Field  Definitions 
a)  EVENT  BLOCK 
NEHMAN 


INCONT 

PTRUP 

PTRDOWN 

MSG 

TIME 


pointer  to  the  player  to  be  processed 
in  the  event.  (Points  to  the  player's 
scoreboard  -  SB) 

Event  code:  (See  Appendix  F.) 

FEL  pointer  to  preceding  event  block  for 
the  player  scheduling  the  event. 

FEL  pointer  to  following  event  block 
for  the  player  scheduling  the  event, 
pointer  to  the  MESSAGE  block.  Used  only 
when  a  message  event  has  been  scheduled. 
Time  of  the  event.  Stored  as  a  real 
vari able. 


c)  MESSAGE 


PTR 

FREQ 

VALUE  1 

VALUE  2 
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e. 


b) 


c) 


LEFTREE  Node 
TIME 

PEVENT 

DIST 


PLEFT 


Time  of  the  event.  Stored  as  a  real 
variable. 

pointer  to  the  EVENT  block. 

Minimum  distance  (in  nodes)  from  a  node 
(LEFTREE)  to  a  leaf  of  the  leftist  tree 
(Note:  leaves  are  vacuous) 

Pointer  to  LEFTREE  node  on  the  right  of 
the  DEL  tree. 


MESSAGE  Block 

PTR 

FREQ 

VALUE  1 

VALUE  2  - 

VALUE  3  - 


Linkages  to  other  Data  Structures 


The  event  blocks  are  linked  to  the  unit  scoreboards  (SB)  of 


both  the  player  initiating  the  event  and  the  player  to  be  processed  by  the 
event.  The  DEL  and  FEL  are  also  pointed  to  by  the  pointers  TREETOR  and 
PTRFEL,  respectively.  In  addition,  the  EVENT  blocks  are  pointed  to  be  the 
following  data  blocks: 

BOCSTAT  DIL  PAL 

BTRYDIL  ENGAGE  SB 

BTRYSTAT  FIREUNIT 


f .  Notes 

The  MADEM  event  code  definitions  listed  in  Appendix  F  indicate 


the  code  number  of  each  MADEM  event  and  the  subroutine  in  which  event 


processing  occurs. 
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Hex  Address  Tree  and  Related  Lists 

a.  Data  Block  Index 
BUFFER 
HEX 

HEXELEV 
LINK 

b.  Description 

Terrain  information  and  the  position  of  units  in  the  hexa¬ 
gonal  coordinate  system  is  stored  in  the  HEX  ADDRESS  TREE  and  its  associ¬ 
ated  PEEPER  and  UNIT  OCCUPANCE  lists. 

The  HEX  ADDRESS  TREE  is  composed  of  HEX  blocks  arranged  in  a 
hierarchical  tree  structure.  Each  of  the  levels  in  the  tree  corresponds  to 
a  level  in  the  hexagonal  coordinate  system.  Table  1 1 1 - 3  indicates  the  levels 
at  which  various  types  of  information  are  stored  in  the  HEX  blocks  terrain 
field  as  well  as  the  levels  at  which  PEPPER  and  UNIT  OCCUPANCY  lists  are 
mai ntai ned. 

UNIT  OCCUPANCY  and  PEEPERS  lists  may  be  attached  to  HEX 
blocks  at  various  levels  in  the  HEX  ADDRESS  TREE  structure.  These  linked 
lists  are  composed  of  a  BUFFER  block  and  a  chain  of  LINK  blocks. 

The  UNIT  OCCUPANCY  LIST  (UOL)  contains  pointers  to  the  score- 
boards  (SB)  of  units  which  occupy  the  HEX  at  the  specified  level. 

The  PEEPER  LIST  (PL)  contains  pointers  to  the  scoreboards 
(SB)  of  units  which  can  SEE  INTO  the  hex. 

1)  Structure  Diagram  (Figure  1 1 1-3) 

2)  Block  Definitions 

HEX  -  HEX  BLOCK.  Contains  HEX  number,  tree 

pointers,  unit  occupancy  list  and  peeper 
list  pointers  and  terrain  pointer. 

BUFFER  -  BUFFER  BLOCK.  Used  by  PEEPER  and  UNIT 

OCCUPANCY  lists.  Contains  pointers  to 
scoreboards  (SB). 
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LEVEL 


PHX TOP 


Figure  1 1 1 - 3 .  Hex  Tree  Structure  Diagram 

4368/79W 
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TABLE  II 1-3. 

HEX  BLOCK  DATA  SPECIFICATIONS 


HEX 

LEVEL 

NO.  OF 

HEX  DIAMETER 

HEX  AREA 

STORAGE 

DEC 

OCT 

HEX  DIGITS 

(KM) 

d2  3  /2 

13 

15 

0 

8575. 

63,700,000 

12 

14 

1 

3240. 

9,100,000 

1 1 

13 

2 

1225. 

1 ,300,000 

10 

12 

3 

463. 

185,600 

1 

9 

11 

4 

175. 

26,500 

8 

10 

5 

66.  1 

3,790 

7 

7 

6 

25. 

541 

2 

6 

6 

7 

9.45 

77 

3 

1  • 

Poi nter 

to 

the  PEEPER  list  is 

active  at  this 

1 evel . 

2  • 

Pointer 

to 

elevation  storage  block  active  at 

this  level 

• 

Poi nter 

to 

PEPPER  1 i st  acti ve 

• 

Pointer 

to 

Unit  occupancy  list 

active 

3  • 

Pointer 

to 

Unit  occupancy  list 

acti ve. 
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Block  Specifications 
1 ).  Block  Diagrams 
a)  HEX 


HEXNUMBER 

LEVEL 

PUP 

PDOWN 

TERRAIN 

PNEXT 

PUOL 

PEEPER 

HEXELEV 

ELEVAT  (SPACE) 


c) 


BUFFER 


PSTART 


NUMLINK 


d) 


LINK 


PNEXT 


PSB 


2)  Field  Definitions 
a)  HEX  Block 
HEXNUMBER  - 
LEVEL 
PUP 
PDOWN 

TERRAIN  - 


HEX  NUMBER  (up  to  7  Octal  Digits) 
HEX  LEVEL  (13-6  used  in  MADEM) 
Pointer  to  parent.  HEX  block 
Pointer  to  daughter  HEX  block 
At  level  7  points  to  HEXELEV  which 
contains  altitude  of  the  hex  in 


meters 

PUOL  -  Pointer  to  unit  occupancy  list 

buffer  block  at  Level  6 
PEEPER  -  Pointer  to  PEEPER  LIST  buffer 

block  at  Level  10. 


b)  HEXELEV  Block 
ELEVAT 


Elevation  in  meters.  Stored  as  a 
real  variable. 


Buffer  Block 


e. 


f. 


PSTART  -  Pointer  to  first  list  block 
NUMLINK  -  Number  of  links  in  list  block  chain. 


d)  Link  Block 

PNEXT  -  Pointer  to  next  link  block 

PSB  -  Pointer  to  unit  scoreboard 

Linkages  to  other  Data  Structures 

Link  blocks  point  to  the  unit  scoreboards  (SB)  of  units 
which  occupy  a  hex  in  the  UOL  list  and  units  which  can  be 
seen  from  a  hex  in  the  PEEPER  LIST. 

Notes 

•  It  appears  that  in  the  unMIDASized  version  of  the  model 
the  BUFFER  BLOCK  is  not  used.  However,  it  was  included 
in  this  documentation  because  it  exists  in  the  MIDAS 
tables. 

•  UOL  and  PL's  may  exist  at  all  levels  in  the  hex  tree. 
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£.  COMMAND/CONTROL  STRUCTURES 


The  command/control  structures  are  used  to  simulate  the  command  and 
control  functions  associated  with  the  NATO  and  PACT  command  hierarchies. 

The  three  structures  in  this  category  include  the  PLAYER’S  LISTS,  C2  TREES, 
and  the  PASSIVE  TARGET  LIST.  The  players  lists  are  used  to  access  partic¬ 
ular  unit  types.  They  are  used  extensively  by  the  semantic  processing 
routines  to  assemble  the  red  and  blue  C2  TREES.  The  C2  TREES  represent  the 
hierarchies  of  red  and  blue  players  in  the  model.  They  are  the  core  of  the 
command/control  simulation.  The  PASSIVE  TARGET  LIST  is  a  list  of  blue  units 
that  are  not  part  of  the  C2  simulation,  but  merely  targets  for  red  attacks. 
These  structures  are  explained  in  detail  in  the  following  subsections. 
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a.  Data  Block  Index 

PLAYERBUFFER 

PLYST 

C2 

b.  Description 

The  red  and  blue  PLAYER  LISTS  are  used  to  access  COMMAND/CONTROL 
blocks  (C2)  of  specified  types.  This  structure  allows  the  semantic  processing 
routines  to  access  units  without  traversing  the  C2  TREE.  This  capability 
is  used  to  construct  the  C2  TREE  in  response  to  VOIL  input. 

The  PLAYER  LIST  structures  consist  of  a  buffer  word  (PLAYER- 
BUFFER)  which  points  to  an  array  (PLYST)  within  ISPACE  which  is  dimensioned 
to  the  largest  number  of  units  in  the  scenario.  Each  word  in  the  PLYST  array 
contains  a  unit  type  code  and  a  pointer  to  a  C2  block  of  that  type. 

c.  Structure  Overview 

1)  Structure  Diagram  (Figure  1 1 1-4) 

2)  Block  Definitions 

PLAYERBUFFER  Player  List  Buffer. 

PLYST  Player  List  Array.  Contains  unit 

type  codes  and  corresponding  pointers 
to  C2  blocks 

C2  Command/Control  Block.  Contains 


d. 


pointers  for  C2  Tree.  Along  with 
unit  number,  side  and  type. 


a)  PLAYERBUFFER 


b) 


PLYST 


3 


c)  C2 


UNIT  NUMBER 

PUP 

PDOWN 

PSB 

PNEXT 

UNITTYPE 

SIDE 

2) 


Field  Definitions 
a)  PLAYERBUFFER  Block 

PTRPL  Pointer  to  PLYST  Player  List 

VARWORD  Total  number  of  players  in  the  list 


b) 


c) 


PLYST  Array 

ILW 

IRW 

C2  Block 
UNITNUMBER 

PUP 

PDOWN 

PNEXT 

PSB 

UNITTYPE 

SIDE 


Unit  type  code  (See  subsection  f) 
Pointer  to  the  unit's  C2  block. 

Number  of  the  unit.  If  negative  the 
unit  is  a  passive  target. 

Pointer  to  the  C2  Block  of  the  unit's 
commander. 

Pointer  to  the  C2  block  of  the  unit’s 
subordi nate. 

Pointer  to  the  C2  block  of  the  unit's 
sibling. 

Pointer  to  the  SB  block  of  the  unit, 
the  unit's  type  code.  (See  subsec¬ 
tion  f) 

Unit  Affiliation. 


1  =  Blue  (NATO) 

2  =  Red  (PACT) 

e.  Linkages  to  Other  Data  Structures 

The  player  lists  are  linked  via  the  C2  blocks  to  the  C2  Tree 
and  Passive  Target  Lists. 
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f. 

Appendix  G. 


Notes 

The  UNITTYPE  Code  Definitions  used  in  MADEM  are  listed 
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MADEM  UNITTYPE  CODE  DEFINITIONS 


Name 

Decimal  Number 

Octal  Number 

HAWK  BTRY 

170 

252 

HGRC  BTRY 

180 

264 

PAT  BTRY 

175 

257 

HAWK  BOC 

150 

226 

HERC  BOC 

160 

240 

PAT  BOC 

155 

233 

CRC 

130 

202 

AIR  BASE 

220 

334 

TAB 

158 

236 

AW  ACS 

132 

204 

LANCE 

86 

126 

HJ 

34 

42 

BRIDGE 

39 

47 

DEPOS 

40 

50 

PERSHING 

83 

123 

POL 

84 

124 

SASP 

210 

322 

ASP 

87 

127 

RESERVES 

88 

130 

TRAINS 

89 

131 

CLV  BTRY 

94 

136 

VII  BTRY 

90 

132 

CORP  CP 

95 

137 

DIV  CP 

92 

134 

SOC 

153 

231 

ATAF 

128 

200 
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AIRCRAFT  UNITTYPE  CODES  (INTERNAL) 


Decimal 

Octal 

BLUE 

401  ~  419 

621  -  643 

AWAC 

499 

763 

RED 

Decimal 

Octal 

Fighters 

420  -  439 

644  -  607 

F/B 

440  -  459 

670  -  713 

Bombers 

460  -  478 

714  '  737 

Unassigned 

480  -  498 

70A  ~  762 
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2.  C2  Trees 


a.  Data  Block  Index 
C2 

PLBUFFER 

SB 

SD8 

b.  Description 

Two  tree  data  structures  are  used  to  represent  the  command 
and  control  hierarchies  for  the  Blue  (NATO)  and  Red  (PACT)  forces.  Only 
player,  as  opposed  to  passive  target,  units  are  included  in  these  trees. 

The  overall  structure  of  these  trees  is  shown  in  the  structure  diagram  bolow. 
The  command  and  control  hierarchies  for  red  and  blue  forces  used  by  the  model 
are  shown  in  subsection  f. 

c.  Structure  Overview 

1)  Structure  Diagram  (Figure  1 1 1-5) 

2)  Block  Definitions 

PLBUFFER  -  C2  Tree  Buffer  Block.  Contains  pointer 
to  the  tree  ans  the  side  of  the  tree. 
Command/Control  Block.  Contains  tree 
pointers,  unit  number,  pointer  to  score- 
d  (SB),  unit  type  code  and  side. 

SB  -  Scoreboard  Block.  Contains  pointers  to 

C2  and  HEX  blocks,  and  the  status  display 
board  (SDB).  Also  contains  pointers  to 
acquisition  devices  vairous  unit  status 
blocks  and  the  future  event  list.  Use 
varies  with  unit  type. 

SDB  -  Status  Display  Board  Block.  Contains 

subordinate,  acquisition  and  order  pointers. 
Use  varies  with  unit  type. 
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PTRRED  OR  PTRBLUE 


CN 

o 
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<368/79w  Figure  ni-5.  C2  Tree  Structure  Diagram 


Block  Specifications 


Note:  +  Alternate  Definition  of  Field 


1_+ZBIRYSIAL 
!  +STATUS  ; 

i  1 


Field  Def i ni ti ons 
a)  PLBUFFER  Block 

p'RPL  Pointer  to  C2  block 

. arwORD  Side  Indicator  for  tree 

Blue  (NATO) 
Red  (PACT) 


"1 


C2  Block 

UNITNUM8ER 

* 

Number  of  the  unit.  If  negative 
the  unit  is  a  passive  target. 

PUP 

Pointer  to  the  C2  block  of  the 

unit's  commander 

PDOWN 

Pointer  to  the  C2  block  of  the 

unit's  subordinate. 

PNEXT 

Pointer  to  the  C2  block  of  the 

unit  sibling. 

PSB 

Pointer  to  the  SB  block  of  the 

unit. 

UNITTVPE 

The  unit's  type  code  (see 

subsection  f) 

SIDE 

S8  Block 

Unit  Affiliation. 

1  =  Blue  (NATO) 

2  =  Red  (PACT) 

AODRESS 

— 

Pointer  to  HEX  block  of  the 

HEX  in  which  the  unit  is  located 

PC2 

- 

Pointer  to  C2  block  of  the  units 

PSDB 

Pointer  to  the  SDB  block  of 

the  unit. 

PFEL 

Pointer  to  future  event  list 

event  block. 

PACQ 

Pointer  to  ACOBUF  block.  Used 

by  CRC's  for  acquisition  devices 

ID 

- 

Identification  number 

DATABASE 

“ 

If  BOC  or  BTRY  points  to 

ADSITEDG  block 

PABSTATUS 

Points  to  ABSTATUS  block  if 

the  unit  is  an  air  base 

+PARCFTSTAT 

Points  to  ARCFTSTATUS  block  if 

the  unit  is  a  flight  of  aircraft 
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+PBOCSTAT 


+PBTRYSTAT 


♦STATUS 

d)  SDB  Block 
PSB 

PSEEBUF 


♦PSEE 


SUBORDINATE 


ORD 


Points  to  BOCSTAT  block  if  the 
unit  is  a  battalion  operations 
center. 

Points  to  BTRYSTAT  block  if 
the  units  is  an  antiaircraft 
battery. 

Alternative  Field  Definition. 

Pointer  to  the  unit’s  SB  block. 
Pointer  to  SEEBUF  block  which 
is  used  by  aircraft  flight  units 
to  record  damage  levels.  This 
field  definition  is  used  only 
by  flights. 

Pointer  to  CRCEES  block  which 
is  used  by  CRC  units  to  record 
the  blue  and  red  flights  it 
sees,  and  by  the  TRC  as  a  pointer 
to  its  assigned  targets  list 
TARGETLISTBLOK. 

Points  to  different  types  of 
subordinate  description  or  target 
desciption  blocks  depending 
upon  the  unit  type.  Possible 
unit  type  vs.  field  use  com¬ 
binations  are  as  follows: 

Unit  Type  Subordinate  Points  to 


CRC 

SUB 

BOC 

SUBLIST 

BTRY 

Fi reunit 

Points  to  Orders 

block  if  the 

unit  is  a  flight. 
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+PRAID  -  Points  to  the  RAIDBLQK  if  the 

unit  is  the  red  theater  commander. 

e.  Linkages  to  other  Data  Structures 

The  C2  TREES  are  linked  to  various  unit  status  structures 
depending  upon  the  type  of  unit  represented  by  the  C2  blocks. 

f .  Notes 

Figures  III-6,  and  1 1 1 - 7  show  the  hierarchies  of  blue 
and  red  player  units.  These  hierarchies  are  representative  of  model  processes 
only  and  are  not  direct  models  of  the  real  world. 
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3. 


Passive  Target  List 

a.  Data  Block  Index 

C2 

SB  (Modified) 

b.  Description 

The  PASSIVE  TARGET  LIST  is  made  up  of  C2  and  associated  SB 
blocks  which  are  in  a  linked  list.  This  list  is  separate  from  the  C2  TREE 
and  is  used  to  represent  Blue  units  which  are  non-players.  These  Blue  units 
are  non-players  in  the  sense  that  they  merely  act  as  objectives  for  red 
attacks. 

Passive  target  units  are  characterized  by  negative  unit 
numbers  in  their  C2  blocks  and  a  modified  SB  block  which  has  three  rather 
than  the  usual  four  words.  The  configuration  of  the  passive  target  list  is 
shown  in  the  structure  diagram. 

c.  Structure  Overview 

1)  Structure  Diagram  ( 1 1 1 -8 ) 

2)  Block  Definitions 


Block  Definitions 
C2 


SB  (Modified)  - 


Command/Control  Block.  Contains 
list  pointers,  a  negative  unit  number, 
pointer  to  SB,  unit  type  code  and 
side. 

Scoreboard  Block.  Three  rather  than 
the  usual  four  words.  Contains 
pointers  to  C2  and  HEX  blocks. 


Block  Specifications 
1 )  Block  Diagrams 
a)  C2 

I  UNITNUMBER 


PUP 

PDOWN 

PSB 

PNEXT 

UNITTYPE 

SIDE 
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b) 


SB  (Modified) 


ADDRESS 

PC2 

PSDB 

PEEL 

PACQ 

ID 

2)  Field  Definitions 
a)  C2  Block 
UNITNUMBER 


PUP 

PDOWN 

PSB 

UNITTYPE 

SIDE 


Number  of  the  Unit.  If 
negative,  the  unit  is  a  passive 
target. 

Pointer  to  the  C2  block  of  the 
units  commander. 

Pointer  to  the  C2  block  of  the 
unit's  sibling. 

Pointer  to  the  SB  block  of  the 
unit. 

The  unit's  type  code  (see 
subsection  f) 

Uni t  Aff i 1 iation. 


1  =  Blue  (NATO) 

2  =  Red  (PACT) 

PACQ  -  Pointer  to  ACQBUF  block.  Used 

by  CRC's  for  acquisition  devices 
(not  used) 

ID  -  Identification  Number 

e.  Linkages  to  Other  Data  Structures 

The  PASSIVE  TARGET  LIST  is  used  exclusively  for  targeting  by 
the  red  planning  module.  Its  only  external  unrage  is  to  the  HEX  block  in 
which  the  unit  is  located. 

f.  Notes 
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F.  RED  STRUCTURES 

The  Red  Structures  are  used  to  simulate  the  Red  Threat  Planning  and 
attack  processes.  The  Red  Theater  Commander  (RTC)  is  the  focal  point  of  all 
other  Red  Structures.  The  RED  THEATER  COMMANDER  structures  together  with 
its  associated  CORRIDOR  DESCRIPTION  lists  and  ATTACK  REQUIREMENTS/ 
ALLOCATIONS  lists  controls  the  assignment  of  flights  to  specific  targets. 
Potential  targets  are  obtained  from  the  POTENTIAL  TARGET  LIST  and  placed  on 
either  the  ASSIGNED  TARGET  list  or  NONAVAILABLE  TARGET  list  by  the  RTC. 
Orders  are  then  generated  for  each  flight  which  determine  the  mission 
profile  for  the  COMMINS  attack.  Once  flights  have  been  launched  many 
of  the  planning  structures  mentioned  above  are  no  longer  required.  They 
are  therefore  released  for  other  uses. 


1.  Red  Theater  Commander 


a.  Data  Block  Index 

C2 

RAIDBLOK 

SB 

SOB 

STDBLOK 

TARGETLIST8L0K 

TTDBLOK 

WAVEBLOK 

b.  Descri ption 

The  Red  Theater  Commander  is  the  core  of  the  Red  Attack 
Planning  Process.  It  controls  execution  of  raids  and  waves  through  its 
RAIDBLOK/WAVEBLOK  list.  Similarly,  choice  of  targets  is  controlled  by 
the  commander's  PERCEPTIONS  LIST  (also  refered  to  as  the  ASSIGNED  TARGET 
LIST).  The  Red  Theater  Commnder  also  controls  the  allocation  of  flights 
to  targets  on  its  PERCEPTIONS  LIST  through  pointers  from  its  WAVERLOK 
blocks  to  the  REQUIREMENTS/ALLOCATIONS  LISTS.  *In  addition,  pointers  from 
its'  RAIDBLOK  blocks  to  CORRIDOR  DESCRIPTION  LISTS  allow  the  Red  Commander 
to  Assign  attacks  to  various  corridors. 

c.  Structure  Overview  (Figure  I I 1-9) 

1 )  Structure  Diagram 

2)  Block  Definitions 

C^  -  COMMAND/CONTROL  BLOCK.  Contains  unit  no, 

type,  side  and  C2PTRS. 

SB  -  SCOREBOARD  BLOCK.  Contains  HEX  PTR,  Unit 

ID,  PTR  to  FEL. 

SDB  -  STATUS  DISPLAY  BLOCK.  Contains  PTRS  to 

assigned  tgt  list  (perceptions  list)  and 
RADIBLOK  initialization. 

RAIDBLOK  -  RAID  DESCRIPTION  BLOCK.  Contains  basic 

parameters  for  a  raid  including  no.  of 
waves  and  corridors. 
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Red  Theater  Commander  Structure  Diagram 


WAVEBLOK  -  WAVE  DESCRIPTION  BLOCK.  Contains  basic 

parameters  for  a  wave  including  no.  of 
tgt  types,  start  time  and  duration. 
TARGETLISTBLOK  -  TARGET  LIST  BUFFER.  Contains  number  of  tgt 

type  (TTDBLOK)  blocks  in  the  list 
TTDBLOK  -  TARGET  TYPE  BLOCK.  Contains  TGT  type  code 

and  PTR  to  next  TTDBLOK  type,  also  contains 
PTR  to  a  list  of  specific  tgts  of  the  same 
type  (STDBLOK)  and  a  count  of  the  no.  of 
specific  targets. 

STDBLOK  -  SPECIFIC  TARGET  DESCRIPTION  BLOCK.  Con¬ 

tains  PTRS  to  tft  SB  and  HEX  and  to  its 
TGTPTREE.  Also  contains  perceived  damage 
lavel  and  a  PTR  to  the  next  STDBLOK. 

d.  Block  Specifications 
1 )  Block  Diagrams 


UNITNUMBER 

PUP 

PDOWN 

PSB 

PNEXT 

UNITTYPE 

SIDE 

b) 


SB 
ADDRESS 
PSDB 
PACQ 

DATA  BASE 


PC2 

PFEL 

ID 

PABSTANS 


+ _ PARCPTSTAT_j 

_PB0CSTAT _ j 

+  PBTRYSTAT  ' 


BTATUS 
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SDB 

PSB 

PSEEBUF 

;  + 
i 

PSEE 

|  SUBORDINATE 

ORD 

l 

l  + 

1 

PRAID  ! 

i 

TARGET  LIST 

BLOK 

PTRTYTL 

NOTYTPL 

TTDBLOK 

PNEXT 

NRTGTYP 

PTGTPL 

NOTGTPL 

g)  RAIDBLOK 


PNEXT 

NRRAID 

PTRWAVE 

NDWAVES 

PTALORD 

NOCORDS 
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number  of  the  unit. 

Pointer  to  the  C2  block  of  the 
unit's  commander. 

Pointer  to  the  C2  block  of  the 
unit's  subordinate. 

Pointer  to  the  C  block  of  the 
unit's  sibling. 

Pointer  to  the  SB  block  of  the 
unit. 

The  Unit's  type  code. 

Unit  affiliation. 

1  =  BLUE 
RED  (PACT) 

b)  SB  Block 


ADDRESS 

Pointer  to  HEX  block  of  the 

hex  in  which  the  unit  is 

located. 

PL2 

“ 

Pointer  to  C2  block  of  the 
unit. 

PSDB 

“ 

Pointer  to  the  SDB  block  of 

the  unit. 

PFEL 

“ 

Pointer  to  future  event  list 

EVENT  block. 

PACQ 

' 

Pointer  to  ACQBUF  block.  Used 
by  CRC's  for  acquisition  devices 

ID 

- 

Identification  number. 

DATABASE 

If  BOC  or  BTRY  points  to 

ADSITEDB  block. 

PBSTATUS 

Points  to  ABSTATUS  block  if 

the  unit  is  an  airbase. 

2)  Field  Definitions 
a)  C2  BLOCK 
UNITNUMBER 
PUP 

PDOWN 

PNEXT 

PSB 

UNITTYPE 

SIDE 

2  = 
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+  PARCFTSTAT  - 

+  PBOCSTAT 

+  PBTRYSTAT 

+  STATUS 
SDB  Block 
PSB 

PSEEBUF 

+  PSEE 


SUBORDINATE  - 


Points  to  AFCFTSTATUS  block  if 
the  unit  is  a  flight  of  aircraft. 
Points  to  BOCSTAT  block  if 
the  unit  is  a  battalion  opera¬ 
tions  center. 

Points  to  BTRYSTAT  block  if  the 
unit  is  an  antiaircraft  battery. 
Alternative  Field  Definition. 

Pointer  to  the  Unit's  SB 
block. 

Pointer  to  SEEBUF  block  which 
is  used  by  aircraft  flight 
units  to  record  targets  seen 
and  their  perceived  damage 
levels.  This  field  definition 
is  used  only  by  flights. 

Pointer  to  CRCEES  block  which 
is  used  by  CRC  units  to  record 
the  blue  and  red  flights  it 
sees.  Also  used  by  the  RTC  to 
point  to  its  assigned  targets 
list  TARGETLISTBLOK. 

Points  to  different  types  of 
subordinate  description  or 
target  description  blocks 
depending  upon  the  unit  type. 
Possible  unit  type  vs.  field 
use  combinations  are  as  follows: 


UNIT 

TYPE 

SUBORDINATE  POINTS  TO 

CRC 

SUB 

BOC 

SUBLIST 

BTRV 

FIREUNIT 

ORD 

** 

Points  to  ORDERS  block  if  the 

unit  is  a  flight. 

+  PRAID 

Points  to  the  RAIDBLOK  if  tne 

unit  is  the  red  theater  commander 

TARGETLISTBLOK 

BLOCK 

PTRTYTL 

- 

Pointer  to  TTDBLOK  block 

NOTYTPL 

TTOBLOK  BLOCK 

Number  of  TTDBLOK  blocks 

(target  types)  in  the  list. 

PNEXT 

Pointer  to  next  TTDBLOK  block 

in  the  list 

NRTGTYP 

** 

Pointer  to  the  STDBLOK  block 

list 

PTGTPL 

— 

Pointer  to  the  STDBLOK  block 

list. 

NGTGTPL 

STDBLOK  BLOCK 

Number  of  STDBLOK  blocks  in 

the  list. 

P  NEXT 

Pointer  to  the  next  STDBLOK 

block  in  the  ASSIGNED  TARGET 

LIST. 

PTGTSB 

Pointer  to  SB  block  of  the 

specific  target. 

PTGTLTR 

- 

Pointer  to  TGTPTREE  node 

OAMAGPER 

Perceived  damage  to  target. 

Stored  as  a  real  variable. 

Initialized  to  2. 
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PADRPER  -  Pointer  to  HEX  block  in  which 

target  unit  is  located. 

g)  RAIDBL  BLOCK 

PNEXT  -  Pointer  to  the  next  RAIDBLOK 

block  in  the  RAIDBLOK  list. 

NRRAID  -  Raid  number. 

PTRWAVE  -  Pointer  to  WAVEBLOK  BLOCK. 

First  in  list. 

NOWAVES  -  Number  of  waves  in  the  list. 

PTRCORD  -  Pointer  to  first  CORRIDORBLOK 

in  the  CORRIDOR  DESCRIPTION  LIST. 

NOCORDS  -  Number  of  corridors. 

h)  WAVEBLOK  BLOCK 

PNEXT  -  Pointer  to  the  next  WAVEBLOK 

block  is  the  list. 

NRWAVE  -  Wave  number 

PTGTYPE  -  Pointer  to  first  TARGETBLOK 

block  in  the  list  of  target 
types  to.be  attacked  in  the 
wave. 

NOTGTYP  -  Number  of  target  types  in  the 

wave. 

STARTIME  -  Start  time.  Real  variable 

DURATION  -  Length  of  wave.  Real  variable. 

e.  Linkages  to  Other  Data  Structures 

The  Red  Theater  Commander  shares  its  STDBLOK  blocks  with 
the  POTENTIAL  TARGET  LIST  and  the  NONAVAILABLE  TARGET  LIST.  In  addition, 
its  RAIDBLOK  blocks  point  to  the  CORRIDOR  DESCRIPTION  STRUCTURES  and  its 
WAVEBLOK  blocks  point  to  the  attack  REQUIREMENTS/ALLOCATION  structures. 

f.  Notes 


a.  Data  Block  Index 
FOREST 

FORTGTBUFFER 

STDBLOK 

TGTPTREE 

b.  Description 

The  POTENTIAL  TARGET  LIST  is  used  to  keep  track  of  potential  targets 
by  the  Red  Theater  Planning  Module.  It  consists  of  a  linker  list  of  FOREST 
blocks.  Each  of  which  corresponds  to  a  particular  target  type  found  in  the 
Blue  C2  TREE  and  PASSIVE  TARGET  LIST  (See  D.2  and  D.3).  Each  FOREST  block 
points  to  a  leftist  tree  composed  of  linked  TGTPTREE  and  STDBLOK  blocks. 
These  trees  contain  location,  damage  and  command/control  information  for 
specific  targets  of  the  type  found  in  the  origin  FOREST  blocks.  These 
specific  target  trees  are  sometimes  referred  to  as  PROBABALISTIC  EVENT 
TREES. 

Within  each  tree  the  TGTPTREE  blocks  act  as  the  nodes  of  the  tree 
while  the  STDBLOK  blocks  act  as  repositories  of  key  information  on  the 
target.  The  nodes  of  the  tree  are  sorted  by  damage  level  with  the  least 
damaged  target  residing  at  the  top  of  the  tree.  For  a  complete  explanation 
of  the  leftist  tree  sorting  algorithm  see  APPENDIX  E.  Perceived  damage  is 
stored  in  STDBLOK  while  actual  damage  is  stored  in  TGTPTREE  block. 

STDBLOK  blocks  may  be  strung  into  linked  lists  to  form  the  assigned 
target  list  discussed  in  E.2.  The  overall  conf iguration  of  the  POTENTIAL 
TARGET  LIST  is  shown  in  the  structure  diagram. 

c.  Structure  Overview 

1)  Structure  Diagram  (Figure  1 1 1 - 1 0 ) 

2)  Block  Definitions 

FORTGTBUFFER  -  FOREST  LIST  BUFFER  BLOCK.  Contains 

number  of  forest  blocks. 

TARGET  TYPE  BLOCK.  Contains  TGTTYPE 
code  and  a  PTR  to  a  tree  of  specific 
targets  of  that  type. 


FOREST 


PTREFOREST 


TGTPTREE 


STDBLOK 


REE  -  TARGET  TREE  NODE.  Contains  PTAS  to  left  and 

right  nodes  of  leftist  tree  used  to  sort 
specific  TGTS  by  damage  level.  Also  contains 
PTR  to  its  corresponding  STDBLOCK.  TGTPTREE 
damage  level  is  the  actual  damage  level. 

OK  -  SPECIFIC  TARGET  DESCRIPTION  BLOCK.  Contains 

PTRS  to  TGT  SB  and  HEX  and  to  its  corresponding 
TFTPTREE.  Also  contains  the  perceived  damage 
level  for  the  TGT.  STDBLOCKS  have  a  PNEXT 
field  which  allows  them  to  be  threaded  into  a 
linked  list  of  assigned  targets. 

Block  Specifications 
1 )  Block  Diagrams 

a)  FORTGTBUFFER 
I  PFOREST 1  VARWORD  I 


b)  FOREST _ 

PNEXT  NRTYPE 


PTREE 


c)  TGTPTREE 


DAMAGE 

PSTDBLOK 

OIST 

PLEPT  | 

_  1 

PRITE 

STDBLOK 

PNEXT 


PTGTSB 

PTGTLTR 


DAMAGPER _ 

PADRPER  F-9 


Oi 


2)  Field  Definitions 

a)  FORTFTBUFFER  BLOCK 

PFOREST  -  Pointer  to  FOREST  block. 

VARWORD  -  Not  used 

b)  FOREST  BLOCK 

PNEXT  -  Pointer  to  next  FOREST  block. 

PTREE  -  Pointer  to  top  TGTPTREE  block  in 

probabilistic  event  tree. 

c)  TGTPTREE  NODE 

DAMAGE  -  Actual  damage  to  the  target.  Stored 
as  a  real  variable.  Initialized  to 
2.0 

PSTDBLOK  -  Pointer  to  STDBLOK  block. 

DIST  -  Distance  leaf  of  the  tree  in  nodes. 

PLEFT  -  Pointer  to  left  TGTPTREE  node  in 

the  tree 

PRITE  -  Pointer  to  right  TGTPTREE  node  in 

the  tree. 

d)  STDBLOK  BLOCK 

PNEXT  -  Pointer  to  the  next  STDBLOK  block 

in  the  ASSIGNED  TARGET  LIST. 

PTGTSB  -  Pointer  to  SB  block  of  the  specific 

target. 

PTGTLTR  -  Pointer  to  TGTpTREE  node 

DAMAGPER  -  Perceived  damage  to  target.  Stored 

as  a  real  variable.  Initialized  to  2. 


PAORPER 


Dointer  to  HEX  block  in  which 


target  unit  is  located. 

e.  Linkages  to  other  Data  Structures 

The  POTENTIAL  TARGET  LIST  shares  its  STDBLOK  blocks  with 
the  ASSIGNED  TARGET  LIST  and  the  NONAVAILABLE  TARGET  LIST. 

f .  Notes 

The  relationship  of  the  potential  and  assigned  target 
lists  is  illustrated  in  Figure  III- 11. 
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3.  Assigned  Target  List 

(Red  Commander  Perceptions  List) 

a.  Data  Block  Index 

ATTACKBLOK 

SOB 

STD8L0K 

TARGETLISTBLOK 

TTDBLOK 

b.  Description 

The  ASSIGNED  TARGET  LIST  is  used  by  the  Red  Theater  Planning 
module  to  keep  track  of  targets  designated  for  attack  in  the  current  raid. 

It  is  actually  a  series  of  nested  lists  with  lists  of  specific  target 
description  blocks  (STDBLOK)  stratified  by  target  type.  The  STDBLOK  blocks 
are  obtained  from  the  POTENTIAL  TARGET  LIST.  The  desired  STDBLOK  blocks 
in  the  potential  target  list  are  pointed  to  be  specific  target  resource 
allocation  blocks  (ATTACKBLOK)  created  by  the  Red  Theater  Planner  when 
resources  are  matched  to  attack  requirements.  (See  E.4  for  further  details). 
The  overal 1  .configuration  of  the  ASSIGNED  TARGET  LIST  is  shown  in  the 
structure  diagram.  The  assigned  target  list  is  attached  to  the  Red  Theater 
Commander's  SOB  block. 

c.  Structure  Overview 

1)  Structure  Diagram  (Figure  III-12) 

2)  Block  Definitions 

TARGETLISTBLOK  -  TARGET  LIST  BUFFER.  Contains  number 

of  TGT  TYPE  (TTDBLOK)  blocks  in  the 
list. 

TTDBLOK  -  TARGET  TYPE  BLOCK.  Contains  TGT  type 

code  and  PTR  to  next  TTDBLOK  type, 
also  contains  PTR  to  4  list  of  specific 
tgts.  of  the  same  type  (STDBLOK)  and 
a  count  of  the  no.  of  specific 
targets. 
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SEE 

POTENTIAL 

TARGET 

LIST 


Figure  III-12.  Assigned  Target  List  Structure  Diagram 
(Red  Commander  Perception  List) 
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STDBLOK 


d. 


SDB 

SB 

o2 


ATTACKBLOK 


Block  Specifications 

1 .  Block  Diagrams 

a)  SDB 

PSB 

PSEEBUF 

+ 

PSEE  j 

SUBORDINATE 

ORD 

+ 

PRAID  ! 

b) 

TARGETLISTBLOK 

PTRTYTL 

NOTYTPL 

c) 

TtDBLOK 

PNEXT 

NRTGTYP 

PTFTPL 

NOTGTPL 

d) 

STDBLOK 

PNEXT 

PTGTSB 

PTGTLTR 

DAMAGPER  (SPACE) 

PADRPER 

e) 

ATTACKBLOK 

PNEXT 

PNXTGTL 

PFMAKTC 

NOFMAKT 

ISECTOR 

PNXTCRD 

SPECIFIC  TARGET  DESCRIPTION  BLOCK. 
Contains  PTRS  to  tgt.  SB  and  HEX 
and  to  its  TGTPTREE.  Also  contains 
perceived  damage  level  and  a  PTR  to 
the  next  STDBLOK 

STATUS  DISPLAY  BOARD  of  Red  Commander 
SCOREBOARD  of  Red  Commander 
COMMAND  CONTROL  BLOCK  of  Red  Commander 
SPECIFIC  TARGET  ATTACK  RESOURCE 
ALLOCATION  BLOCK  for  target. 
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2)  Mel 
a) 


ORD 

+  PRAID 


d  Definitions 


SBD  BLOCK 
PSB 

PSEEBUF 


+PSEE 


SUBORDINATE 


Pointer  to  the  Unit's  SB  block. 
Pointer  to  SEEBUF  block  which  is 
used  by  aircraft  flight  units  to 
record  targets  seen  and  their 
perceived  damage  levels.  This  field 
definition  is  used  only  by  flights. 
Pointer  to  CRCEES  olock  which 
is  used  by  CRC  units  to  record 
the  Blue  and  Red  Flights  it 
sees.  Also  used  by  the  RTC  as  a 
pointer  to  its  assigned  targets  list. 
TARGETLISTBLOK. 

Points  to  different  types  of 
subordinate  description  or 
target  description  blocks 
depending  upon  the  unit  type. 

Possible  unit  type  vs.  field 
use  combinations  are  as  follows: 


UNIT  TYPE  SUBORDINATE  POINTS  TO 

CRC  SUB 

BOC  SUBLIST 

BTRY  FIREUNIT 


Points  to  ORDERS  block  if  the  unit  is  a  flight. 
Points  to  the  RAIDBLOK  if  the  unit  is  the  Red 
Theater  commander. 


b)  TARGETLISTBLOK  BLOCK 

PTRTYTL  -  Pointer  to  TTDBLOK  block 

NOTYTPL  -  Number  of  TTDBLOK  blocks  (target 

types)  in  the  list. 
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V 


e. 


c) 


d) 


TTDBLOK  BLOCK 

PNEXT  -  Pointer  to  next  TTD8LK  block  in 
the  list 


NRTGTYP  -  Target  type  code. 

PTGTPL  -  Pointer  to  the  STDBLOK  block  list 

NOTGTPL  -  Number  of  STDBLOK  blocks  in  the  list 

STDBLOK  BLOCK 

PNEXT  -  Pointer  to  the  next  STDBLOK  block 

in  the  ASSIGNED  TARGET  LIST. 


PTGTSB 

PTGTLTR  - 
DAMAGPER  - 


PADRPER  - 


Pointer  to  SB  block  of  the 
specific  target. 

Pointer  to  TFTPTREE  node. 
Perceived  damage  to  target. 
Stored  as  a  real  variable. 
Initialized  to  2. 

Pointer  to  HEX  block  in  which 
target  unit  is  located. 


e)  ATTACK  BLOCK 

PNEXT  -  Pointer  to  next  ATTACK  BLOK  in  list. 

PNXTGTL  -  Pointer  to  STDBLOK  block. 

PFMAKTG  -  Pointer  to  FAKTGBLOK  block. 

NOFMAKT  -  Number  of  FAKTGBLOK  blocks  (formation 
attacking  target)  in  the  list. 

ISECTOR  -  Sector  of  the  attack  relative  to 

the  attack  corridor,  (see  corridor) 

PNXTCRD  -  Pointer  to  the  CORRIDOR  block  for 

the  attack. 

Linkages  to  Other  Data  Structures 


The  ASSIGNED  TARGET  LIST  shares  its  STDBLOK  blocks  with 
the  POTENTIAL  TARGET  LIST  and  the  NONAVAILABLE  TARGET  LIST.  In  addition 
its  STDBLOK  blocks  are  pointed  to  by  ATTACKBLOK  blocks  which  reside  in 
the  attack  REQUIREMENTS/ ALLOCATIONS  structure. 
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f .  Notes 

Figure  III-ll  illustrates  the  relationship  of  the  potential 
assigned  target  lists.  This  relationship  is  crutial  to  an  understanding 
the  target  assignment  process. 
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4. 


Nonavai Table  Target  List 

a.  Data  Block  Index 


NOAVAILBLQK 

STDBLOK 

b.  Description 

The  NONAVAILABLE  TARGET  LIST  is  used  by  the  Red  Theater  Planning 
Module  to  keep  track  of  targets  which  cannot  be  attacked  in  the  current 
raid.  Targets  are  placed  on  the  NONAVAILABLE  TARGET  LIST  when  they  are  not 
in  the  allowable  attack  shown  in  Subsection  F  and  when  attack  resources 
are  not  sufficient  to  match  mission  requirements.  The  overall  configuration 
of  the  nonavai Table  target  list  is  shown  in  the  structure  diagram. 

c.  Strucutre  Overview 

1 ,  Structure  Diagram  (Figure  I I I- 13) 

2)  Block  Definition 

NOAVAILBLQK  -  NON-AVAILABLE  TARGET  BLOCK.  Created 

by  TGTGONE  routine  and  used  by  other 
targets  which  are  not  available  for 
attack  due  to  lack  of  resources  or 
geographic  unsuitability.  Contains 
PTR  to  STDBLOCK  and  PTR  to  next 
NOAVAILBLOK.  Also  contains  perceived 
damage  level.  (Projected  damage 
level ). 

STDBLOK  -  SPECIFIC  TARGET  DESCRIPTION  BLOCK. 

Contains  target  SB  and  HEX  PTRS 
as  well  as  a  PTR  to  the  TGTPTREE. 

Also  contains  the  perceived  damage 
level  for  the  target  and  a  PNEXT 
field  which  allows  them  to  be 
threaded  into  a  linked  list  of 
assigned  targets. 
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PNOAVAL  =  PTR  IN  COMMOM  THTRPLN 


INOAVAILBLOK.  STDBLOK 


SB 

TGTPTREE 

HEX 


SB 

TGTPTREE 

HEX 


SB 

TGTPTREE 

HEX 


Figure  1 1 1 - 1 3 -  Nonavailable  Target  List  Structure  Diagram 


no 


Ill 


f .  Notes 

Figure  111-1411 lustrates  the  attack  sectors  relative  to  an 
attack  corridor. 
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5.  Corridor  Description  Lists 


a.  Data  Block  Index 
ABVCR 

ACTA8 

CONSTBLOK 

CORRIDORBLOK 

HEXBLOK 

HEXLINK 

b.  Description 

The  CORRIDOR  DESCRIPTION  LISTS  are  used  by  the  Red  Theater 
Planning  Module  to  specify  the  boundaries  of  the  attack  corridors  input 
by  the  user.  They  are  also  used  to  keep  track  of  the  assignment  of  airbases 
to  corridors  within  aircraft  range  and  the  types  of  aircraft  available  on 
the  bases.  The  general  configuration  of  attack  corridors  is  illustrated 
in  Subsection  F. 


c. 


Structure  Overview 

1)  Structure  Diagram  (Figure  III-15) 

2)  Block  Definitions 


CORRIDORBLOK  -  CORRIDOR  DESCRIPTION  BLOCK.  Contains 

basic  corridor  parameters  input 
by  user. 


CONSTBLOK  -  CORRIDOR  CONSTANTS  BLOCK.  Contains 

values  calculated  from  corridorblok 
contents  which  describe  the  corridor 
boundaries. 


HEXBLOK 


HEXLINK 


HEXLINK  BUFFER  BLOCK.  Contains  part 
to  five  HEXLINK  lists  which  specify 
the  corridor  in  terms  of  hexes. 
HEXLINK  BLOCK.  Contains  ptrs.  to 
next  HEXLINK  and  PTR  to  HEX. 
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d. 


ABVCR  -  AIR  BASE  VS.  CORRIDOR  BLOCK.  Air 

vs.  corridor  assignment  contains 
PTR  to  next  ABVCR,  FTR  to  air  base 
SB,  the  number  of  aircraft  on  the 
air  base,  and  PTR  to  ACTAB  list. 

ACTAB  '  AIRCRAFT  ON  AIRBASE  BLOCK.  Aircraft 

assignment  to  airbase.  Contains  a/c 
type,  no  on  hand  at  base,  no  assigned, 
and  PTR  to  next  ACTAB. 

Block  Specifications 


1 )  Block  Diagrams 

a)  CORRIDQRBLOK 


PNEXT 

NRCORD 

PABUSCOR 

NOABVC R 

PLHEX 

PRHEX 

PCHEX 

NHWIDTH 

PHLIST 

PBOCNST 

DEPTHLR  (SPACE) 

ANGCORD  (SPACE) 

ANGSPRD  (SPACE) 

BUFRWOH  (SPACE) 

b)  CONSTBLOK 


CORDSCOPE 

YINTLBUF 

YINTLCOR 

YINTRCOR 

YINTRBUF 

XSPREAO 

YSPREAO 

ENTRYSLOPE 

YLINENTRY 

YENDCCRO 
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c)  HEXBLOK 


ITOTAL 

PHEXY 

N0LIST1 

PHEX1 

N0LIST2 

PHEX3 

N0LIST3 

PHEX6 

N0LIST4 

PHEXUNK 

NOLISTUNK 

d)  HEXLINK 


2)  Field  Definitions 

a)  CQRRIDORBLOK  BLOCK 

PNEXT  -  Pointer  to  next  CDRRIDORBLOK  block 

NRCORD  -  Corridor  Number. 

PLHEX  -  Pointer  to  left  corridor  hex. 

PRHEX  -  Pointer  to  right  corridor  hex. 

PCHEX  -  Pointer  to  centerline  corridor  hex. 

PBDCNST  -  Pointer  to  CONSTBLOK  block. 

PABVSCOR  -  Pointer  to  ABVCR  block  list. 

NOABVCT  -  Number  of  ABVER  blocks  in  the  list. 

PHIIST  -  Pointer  to  HEXBLOK  block. 

OEPTHCR  -  Depth  of  corridor,  real  variable. 

ANGCORD  -  Angle  of  corridor,  real  azimth 

ANGSPRD  -  Spread  angle  of  corridor  exit,  real 
BUFRWDH  -  Sam  buffer  zone  width,  real 

b)  CONSTBLOK  BLODK 

CORDSCLOPE  -  Corridor  slope 

YINTLBUF  -  Y  intercept  of  buffer  zone 

boundary- left. 
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YINTRCOR 


YINTRBUF 

XSPREAD 

YSPREAD 

ENTRYSLOPE 

YLINENTRY 

YENDCORO 

c)  HEXBLOK  BLOCK 
ITOTAL 
PHEXY 

NOLIST1 

PHEX1 

N0LIST2 

PHEX3 

NOLIST3 

PHEX6 

N0LIST4 

PHEXUNK 

NOLISTUNK 


Y  intercept  of  corridor 
boundary-right. 

Y  intercept  of  buffer  zone 
boundary  -  right 

X  coordinate  of  exit  spread 
1 i nes. 

Y  coordinate  of  exit  spread 
1 i nes. 

Slope  of  corridor  center  line. 

Y  intercept  of  corridor 
center  line. 

Y  intercept  of  corridor  exit. 


Pointer  to  HEXLINK  list  (corridor 
left  to  corridor  center) 

Number  of  (PHEX4)  HEXLINK 
blocks  in  the  list 
Pointer  to  HEXLINK  list  (buffer 
left  to  corridor  left) 

Number  of  (PHEX1)  HEXLINK  blocks 
in  the  list. 

Pointer  to  HEXLINK  list  (corridor 
right  to  buffer  right) 

Number  of  (PHEX3)  HEXLINK  blocks 
in  the  list. 

Pointer  to  HEXLINK  list  (corridor 
center  to  corridor  right) 

Number  of  (PHEX6)  HEXLINK  blocks 
i n  the  list. 

Number  of  HEXLINK  list  hexes 
between  corridor  ends) 

Number  of  (PHEXUNK)  HEXLINK  blocks 
in  the  list. 
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d) 

HEXLINK  BLOCK 

PNEXT 

_ 

Pointer  to  next  HEXLINK  block 

HEX 

• 

in  the  list. 

Pointer  to  HEX  block  (Note: 

e) 

ABVCR  BLOCK 

PNEXT 

could  also  be  a  nex  number) 

Pointer  to  next  ABVCR  block 

PTRABSB 

_ 

in  the  list 

Pointer  to  airbase  SB  block 

PACTAB 

- 

Pointer  to  ACTAB  block 

NOACTAB 

- 

Number  of  ACTAB  blocks  in  the 

f) 

ACTAB  BLOCK 

PNEXT 

1  i  st 

Pointer  to  next  ACTAB  in  the 

NRACTYP 

- 

1  i  st 

Aircraft  type  code 

NOACOH 

- 

Number  of  aircraft  on  hand 

NOACASN 

- 

Number  of  aircraft  assigned 

Li nkaqes 

to  other  Data  Structures 

e. 

The  CORRIDOR  DESCRIPTION  LISTS  are  pointed  to  by  a  RAIDBLOK 
block  which  describes  the  raid  in  which  the  corridor  is  used. 

f .  Notes 

Figure  1 1 1 - 1 6  illustrates  the  relationship  of  HEXLINK  lists 
corridor  boundaries. 


to 
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LEFT 


(HEXLINE  1 
PHEXUNIC 


RIGHT 


4368/79W 


PCHEX 

WIDTH  IN  HEXES 


ENTRANCE 


PLEFTS  PLHEX 


PCHEX 


PRHEX  PRIGHTS 


I 


PHEX1  PHEX4  PHEX6  PHEX3 

t  ,  ♦  j  1 

1  HEX LINEmEXLINKl^HEXL INK  |HEX LINK 


/{HEXLINS  HEXLINh 


e 


3 


Figure  1 11-16.  Relationship  of  HEX  LINK  Lists  To  Corridor  Boundaries 
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Attack  Requirements/Allocations  Lists 

a.  Data  Block  Index 
ATTACKBLOK 
ACTAB 
COMMAND 
FAKTGBLOK 
FDBOBLOK 
FLTAKTBLOK 
FMFLTDB 
FORMATIONBLOK 

b.  Description 

The  REQUIREMENTS  LIST  is  used  by  the  Red  Theater  Planner  to 
specify  the  number  and  composition  of  formations  required  to  attack  targets 
of  various  types.  Each  TARGETBLOK  block  corresponds  to  a  generic  target 
type  (e.g. ,  airbase,  boc,  btry).  FORMATIONBLOK  blocks  correspond  to  the 
formation  types  required  for  a  target  type.  Each  FORMATIONBLOK  points  to  a 
FOBDBLQK  block  (formation  data  base)  which  in  turn  points  to  a  list  of 
FMFLTDB  blocks  (formation  flight  description)  which  point  to  FLTDB  blocks 
(flight  data  base)  for  various  types  of  flights.  Each  flight  is  homogeneous 
with  respect  to  aircraft  type.  The  aircraft  for  a  flight  must  be  assembled 
on  a  single  air  base.  Partial  flights  cannot  be  launched.  However,  forma¬ 
tions  can  be  assembled  from  flights  originating  at  multiple  air  bases.  The 
formations  required  for  each  target  type  must  be  specified  by  the  user  for 
each  raid  via  the  UOL. 

The  ALLOCATIONS  LIST  parallels  the  REQUIREMENTS  LIST.  It 
corresponds  to  the  actual  allocation  of  aircraft  resources  to  specific 
targets  of  the  types  specified  in  the  TARGETBLOK  blocks.  The  structure 
diagram  illustrates  this  parallel  structure.  FKTGBLOK  blocks  (formation 
attacking  target)  in  the  ALLOCATIONS  LIST  correspond  to  the  FORMATIONBLOK 
blocks  in  the  REQUIREMENTS  list.  Similarly,  FLTAKTBLOK  blocks  (flight 
attacking  target)  correspond  to  FMFLTDB  blocks.  It  should  be  noted  that 
all  blocks  indicated  by  an  asterisk  (*)  are  released  after  planning,  the 
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only  blocks  which  remain  after  planning  are  the  database  and  command  blocks 
required  for  subsequent  operation  of  FLIGHTS  created  by  the  planning  module, 
c.  Structure  Overview 


Structure  Diagram  (Figure  I I I - 1 7 ) 

Block  Definitions 

REQUIREMENTS  LIST  DEFINITIONS  -  resource  require- 

ments  for  target  types. 

WAVEBLOK  -  WAVE  DESCRIPTION  BLOCK.  Contains 

TARGETBLOK 

PTRS  to  next  wave  and  TARGETBLOK 

list  along  with  the  wave  number  and 
the  number  of  TARGETBLOK  types  in 

the  list  also  contains  the  start 

time  and  duration  of  the  wave. 

TARGET  TYPE  RESOURCE  REQUIREMENTS  BLOCK 

FORMATIONBLOK  - 

Contains  target  type  code,  PTRS  to 

formation  and  attackblok  lists  and 

the  number  of  formations  and  attack- 

bloks  in  each  list.  Also  contains 

the  maximum  aircraft  allocation  for 

the  TGT  type,  the  number  allocated, 

and  the  minimum  and  maximum  attack 

radius. 

FORMATION  DESCRIPTION  BLOCK. 

FDBDBLOK 

Contains  PTRS  to  next  FORMATION 

BLOCK  and  to  FDBDBLOK  as  well  as 

the  number  of  formations  required 

and  assigned 

FORMATION  DATA  BASE  BLOCK.  Contains 

FMFLTDB 

basic  formation  type  specifications 
including  pointer  to  flight  data 
base  list  (FMFLTDB). 

FORMATION  COMPONENT  FLIGHT  DATA  BLOCK. 

Contains  PTR  to  FLTDB  flight  data 
base  block  for  a  flight  attached  to 

the  formation. 
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REQUIREMENTS  LIST 


ALLOCATIONS  LIST 


ATTACK  RESOURCE  REQUIREMENTS  FOR 
VARIOUS  TARGET  TYPES 


ATTACK  RESOURCE  ALLOCATIONS 
FOR  SPECIFEC  TARGETS 


WAVEBLOK 


TARGETBLOK 


h-^HEX 


-HEX 


Figure  III-17.  Attack  Requirements/Allocations  List  Structure  Diagram 


ALLOCATIONS  LIST  DEFINITIONS  - 

ATTACKS LOK- 


FAKTGBLOK  - 


FLTAKBLOK  - 


ACTAB 


COMMAND 


Resource  Allocations  for  specific  targets. 
SPECIFIC  TARGET  RESOURCE  ALLOCATION 
BLOCK.  Contains  PTRS  to  specific  target 
description  block  (STD8L0K),  formations 
attacking  targetBlist  (FAKTGBLOK)  and 
the  CORRIDOR  block  for  the  corridor 
through  which  the  attack  will  take 
place.  Also  contains  attack  sector. 
FORMATIONS  ATTACKING  TARGET  BLOCK. 

Contains  description  of  a  formation 
assigned  to  attack  the  target.  Contains 
PTRS  to  the  FDBDBLOK  described  above, 
the  next  FAKTGBLOK  attacking  the  TGT  and 
a  list  of  FLTAKTBLOK  (flights  attacking 
the  TGT)  which  make  up  the  formation. 

Also  contains  the  number  of  FLTAKTBLOKS. 
FLIGHTS  ATTACKING  TARGET  BLOCK.  Basic 
description  of  the  flight,  its  composi¬ 
tion,  home  base  and  orders. 

AIRCRAFT  ON  AIRBASE  BLOCK.  Number  of 
aircraft  of  the  type  specified  in  FLTAKTBLOK 
on  hand  and  assigned  at  FLT's  home  base. 
COMMANO  FOR  ENTITY.  A  list  of  up  to  six 
COMMAND  blocks  describes  all  of  the 
actions  which  must  be  taken  by  the  Red 
Flight  in  the  course  of  its  mission. 

Contains  the  action  to  be  taken,  a  PTR 
to  the  hex  address,  and  optionally  the 
time  at  which  the  action  is  to  occur. 
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d.  Block  Specifications 
1 )  Block  Diagrams 

a)  WAVEBLOK 


PNEXT 

NRWAVE 

PTGTYPE 

NOTGTYP 

STARTIME  (SPACE) 

DURATION  (SPACE) 

b) 

TARGETBLOK 

PNEXT 

NRTGTYP 

PTRFORM 

NOFORM 

PTGTATK 

NOTGTAK 

MAXACAL 

NOACALC 

MAXRHEX 

NONRHEX  ' 

c) 

FQRMATIONBLOK 

PNEXT 

PNXFRDB 

NOFRMRQ 

NOFRMAL 

d) 

FDBDBLOK 

PNEXT 

NRFORM 

PTRFLT 

NOFLTL 

SPFORMC 

e) 

FMFLTDB 

[ 

PNEXT 

PNXFLODB 

f) 

ATTACKBLOK 

PNEXT 

PNXTGTL 

PFMAKTC 

NOFMAKT 

ISECTOR 

PNXTCRD 

g) 

FAKTGBLOK 

PNEXT 

PNXFRDB 

PFLTAKT 

NOFLAKT 
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h)  FLTAKTBLOK 


PNEXT 

PNXFLDB 

NOACFLT 

PFLABSB 

PNXACAB 

PTRFRAG 

PFLTSB 

i )  ACTAB 


PNEXT 

NRACTYP 

NOACOH 

NOACASN 

j)  COMMAND 


PNEXT 

NUMACTS 

TMFLG 

ADDRESS 

TIME  (SPACE) 

ACTION 

STDBLO 

X 

PNEXT 

PTGTSB 

PTGTLTR 

PAMGPER  (SPACE) 

PADRPER 

2)  Field  Definitions 

a)  WAVE  Block 
PNEXT 
NRWAVE 
PTGTYPE 
NOTGTYP 
STARTTIME 
DURATION 

b)  TARGET  Block 
PNEXT 
NRTGTYP 
PTRFORM 
NOFORM 
PRGTATK 


pointer  to  next  WAVE  block 
number  of  waves 
pointer  to  TARGETBLOK 
number  of  target  types 
start  time  for  wave 
duration  of  wave 

pointer  to  next  target  block 
number  of  target  types 
pointer  to  FORMATIONBLOK 
number  of  formations 
pointer  to  ATTACKBLOK 
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NOTGTAK 

- 

number  of  attack  blocks 

MAXACAL 

- 

maximum  AC  allocations 

NOACALC 

- 

number  of  AC  allocations 

MAXRHEX 

- 

maximum  range  in  hexes  at  which  the 

'  MINRHEX 

_ 

target  can  be  attacked 

minimum  range  in  hexes  at  which  the 

FORMATIONBLOK 

target  can  be  attacked 

PNEXT 

- 

pointer  to  next  FORMATIONBLOK 

NOFRMRQ 

- 

number  of  formation  req. 

NOFRMAL 

- 

actual  number  of  formations 

FDBDBLOK 

PNEXT 

pointer  to  next  FDBDBLOK 

NRFORM 

- 

formation  number,  must  be  unique 

PTRFLT 

- 

pointer  to  formation  flight  data 

NOFLTL 

_ 

block  (FMFLTDB) 

number  of  flights  in  the  formation 

SPFORMC 

- 

formation  cruise  speed  in  meters/ 

FMFLTOB 

PNEXT 

seconds 

pointer  to  next  formation  flight  block 

PNXFLDB 

(FMFLTDB) 

pointer  to  flight  data  block  (FLTDB) 

ATTACKBLOK 

PNEXT 

-■ 

pointer  to  next  ATTACKBLOK 

PNXTGTL 

- 

pointer  to  STDBLOK 

PFMAKTG 

- 

pointer  to  formation  attacking  target 

NOFMAKT 

block  (FAKTGBLOK) 

number  of  formation  attack  blocks 

ISECTOR 

- 

number  of  sector  to  be  attacked, 

PNXTCRD 

relative  to  attack  corridor 

pointer  to  corridor  block  (CORRIDORBLOK) 
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FAKTGBLOK 

PNEXT 

' 

pointer  to  next  formation  attacking 
target  block  (FAKTGBLOK) 

PNXFRDB 

pointer  to  formation  data  base  block 

(FDBDBLOK) 

PFLTAKT 

pointer  to  flight  attacking  target 
block  (FLTAKTBLOn 

NOFLAKT 

' 

number  of  flights  attacking  target 

blocks 

FLTAKTBLOK 

PNEXT 

- 

pointer  to  next  FLTAKTBLOK 

PNXFLDB 

- 

pointer  to  FLTDB 

NOACFLT 

- 

number  of  actual  flights 

PFLABSB 

- 

pointer  to  air  base  scoreboard 

PNXACAB 

pointer  to  aircraft  on  air  base  block 

(ACTAB) 

PTRFRAG 

- 

pointer  to  COMMAND  block 

PFLTSB 

- 

pointer  to  flight  scoreboard 

ACTAB 

PNEXT 

- 

pointer  to  next  ACTAB 

NRACTYP 

- 

aircraft  type  number 

NOACOH 

- 

number  of  aircraft  on  hand 

NOACASN 

- 

number  of  aircraft  assigned 

COMMAND 

PNEXT 

- 

pointer  to  next  COMMAND  block 

NUMACTS 

- 

number  of  the  command 

TMFLG 

“ 

time  flag,  if  1  a  time  is  associated 

with  the  command 

ADDRESS 

- 

pointer  to  hex  block  for  the  command 

TIME 

- 

time  command  is  to  be  performed 

ACTION 

- 

command  or  action  code 

k)  STD  BLOK 

PNEXT  pointer  to  next  STDBLOK 

PTGTSB  pointer  to  target  scoreboard 

PTGTLTR  pointer  to  TGTPTREE 

DAMGPER  perceived  damage  level 

PADRPER  pointer  to  hex  address 

e.  Linkages  to  Other  Data  Structures 

The  REQUIREMENTS  LIST  is  pointed  to  by  the  WAVEBLOK  block 
which  is  associated  with  the  RED  THEATER  COMMANDER.  The  ATTACKBLOK  block 
in  the  ALLOCATIONS  LIST  points  to  an  STDBLOK  block  (specific  target 
description  block)  in  the  Red  theater  commander's  ASSIGNED  TARGET  LIST 
(also  known  as  the  Red  theater  commander  perceptions  list).  Since  these 
STDBLOK  blocks  are  also  in  the  POTENTIAL  AND  UNAVAILABLE  TARGET  LISTS,  the 
allocations  list  is  also  connected  to  both  the  POTENTIAL  AND  UNAVAILABLE 
TARGETS  LISTS. 

f.  Notes 
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7.  RED  AIR  BASES 


a.  Data  Block  Index 
ABINFO 
ABQUEDB 
ABSTATUS 

ACOB 

C2 

QUEUES 

QUESTAT 

SB 

b.  Description 

RED  AIR  BASE  STRUCTURES  are  designed  to  keep  track  of  the 
number  and  type  of  aircraft  on  the  AIRBASE  as  well  as  the  status  of  each 
aircraft  type  in  terms  of  launch  capability.  The  overall  configuration  of 
this  structure  is  shown  in  the  structure  diagram. 

c.  Structure  Overview 

1)  Structure  Diagram  (See  Figure  1 1 1 - 1 8 ) 

2)  Block  Definitions 

C2  -  COMMAND  CONTROL  BLOCK,  contains  unit  NO, 

type  and  side,  and  C2  PTRS. 

SB  -  SCOREBOARD  BLOCK,  contains  Hex  address, 

MR,  unit  ID,  PTR  to  future  event  list 
for  the  unit,  and  ABSTATUS  PTR. 

SOB  -  STATUS  DISPLAY  SLOCK.  Not  used  by 

AIRBASE. 

ABSTATUS  -  AIR  BASE  STATUS  BLOCK,  contains  PTRS  to 

the  AIRBASE  information  list  (ABINFO) 
and  the  QUEUES  list  for  each  aircraft 
type  on  base.  Also  contains  no  of  A/C 
on  base  and  no  of  types  of  A/C  on  base. 

ABINFO  -  AIRCRAFT  ON  BASE  INFORMATION  BLOCK. 

Contains  aircraft  type,  no  on  hand  and 
no  in  each  service  queue,  and  a  PTR  to 
A/C  type 1 s  ACDB. 
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SB 


ABSTATUS 


"igure  III-18. 


Red  Air  Base  Structure  Diagram 


436V79W 


d. 


QUEUES 

ABQUEDB 

QUESTAT 

ACDB 


AIRCRAFT  SERVICE  QUEUE  BLOCK- 
AIRBASE  QUEUE  DATA  BASE  BLOCK- 
QUEUE  STATUS  BLOCK. 

AIRCRAFT  DATA  BASE  BLOCK.  Operational 
parameters  of  A/C  type. 


Block  Specification 


1 )  Block  Diagrams 


a)  _  C2 


UNITNUMBER 

PUP 

PDOWN 

P  SB 

PNEXT 

UNITTYPE 

SIDE 

b) 

SB 

ADDRESS 

PC2 

PSDB 

PFEL 

PACQ 

ID 

DATABASE 

PABSTATUS 

c) 

ABSTATUS 

PACTAB 

NOACTAB 

PTR20UES 

NOACONAB 

ABDAMAGE 

(SPACE) 

d) 

QUEUES 

NEXT 

QUENUM 

PTR 

NUMBER 

PQDB 

PQUESTAT 

e) 

QUESTAT 

VALUE  (SPACE) 

f) 

ABQUEDB 

PNEXT 

CLASS 

VALUE1 (SPACE) 


VALUE2(SPACE) 
VALUE3(SPACE ) 
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g) 


2)  Field  Specifications 


C2  Block 

UNITNUMBER 

unit  number 

PUP 

pointer  to  C2  block  of  unit' 

s 

commander 

POOWN 

pointer  to  C2  block  of  unit1 

s 

subordi nate 

PSB 

pointer  unit's  SB  block 

PNEXT 

pointer  to  unit's  sibling. 

C2 

block 

UNITTYPE 

unit  type  code  (220) 

SIDE 

unit  affiliation  2  -  Red  (Pact) 

ABINFO 


NEXT  NRACTYP 

N0AC0H  PTRACDB 

N0RMRO 

NOREARMQ 

NOREFVELQ 

NOLAVNCHQ 

ACDB 

NEXT  NRACTYPE 

MAXSPEED  (SPACE) 

CRUISESPEED  (SPACE) 

MAXALTITUDE  (SPACE) 

MINALTITUDE  (SPACE) 

MAXCLIMBDIVE  (SPACE) 

FUELCONSUME  (SPACE) 

ACQ RANGE  (SPACE) 

RADARCS  (SPACE) 

ATTACKRADIUS  (SPACE) 

MAXFUEL  (SPACE) 
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b) 


c) 


d) 


e) 


SB  Block 
ADDRESS 

PC2 

PSDB 

PFEL 

PACQ 

(inactive) 


pointer  to  HEX  block  in  which  unit 
is  located 

pointer  to  C2  block  of  the  unit 
pointer  to  SDB  block  (inactive) 
pointer  to  future  event  list  for 
the  unit 

pointer  to  acquisition  devices 


ID 

DATABASE 
ABSTATUS  Block 
PACTAB 
NOACTAB 


PTR2QUES 

NOACONAB 


ABDAMAGE 
QUEUES  Block 
NEXT 


unit  ED  number 

pointer  to  data  base  block  (inactive) 

pointer  to  ABINFO  block 

number  of  ABINFO  blocks  in  the 

list.  Corresponds  to  number  of 

aircraft  on  the  base. 

pointer  to  QUEUES  block 

number  of  QUEUES  blocks  in  the 

list.  Corresponds  to  number  of 

aircraft  types  on  the  base. 

damage  level  of  base.  Real  variable. 

pointer  to  next  QUEUES  block  in  the 
1  i  st 


QUENUM 

PTR 

NUMBER 

PQDB 

PQUESTAT 
QUESTAT  Block 
VALUE 


QUEUE  number.  (2  =  ready  queue) 

pointer  to  ABQUEDB  block 
pointer  to  QUESTAT  block 

unknown.  Real  variable. 
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PNEXT  pointer  to  next  ABQUEDB  block 

CLASS  aircraft  class 

VALUE! 

VALUE2 

VALUE3 

g)  ABINFO  Block 

NEXT  pointer  to  next  ABINFO  block 

NKACTYP  aircraft  type  code 

NOACOH  number  of  aircraft  of  type  (NRACTYP) 

on  hand  on  the  base 

PTRACDB  pointer  to  ACDB  for  the  aircraft 

type  (NRACTYP) 

NORMRQ  number  in  repair  queue 

NOREARMQ  number  in  rearm  queue 

NOREFUELQ  number  in  refuel  queue 

NOLAUNCHQ  number  in  launch  queue 

h)  ACDB  Block 

NEXT  pointer  to  next  ACDB  block  in  data 

base  (not  used  in  this  context) 
NRACTYPE  aircraft  type  code 

MAXSPEED  maximum  speed.  Real  variable 

CRUI SESPEED  cruising  speed.  Real  variable 

MAXALTITUDE  maximum  altitude.  Real  variable 
MAXCLIMBDIVE  maximum  rate  of  altitude  change. 

Real  variable 

FUELCONSUME  Fuel  consumption  rate.  Real  variable 

ACQRANGE  acquisition  range.  Real  variable 

RADARCS  radar  cross-section.  Real  variable 

ATTACKRADIUS  -  maximum  attack  range  of  aircraft. 

Real 

vari able 

MAXFUEL  maximum  fuel  capacity.  Real  variable 


e.  Linkages  to  Other  Data  Structures 


f .  Notes 

QUEUES  blocks  and  their  related  lists  are  not  used  at  present. 
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8.  Red  FI ights 

a.  Data  Block  Index 
ACDB 

AQD8 

ARCFSAW 

ARCFTSTATUS 

C2 

COMMAND 

FLTDB 

FORMATION 

LOAD 

MUN 

QRDERES 

PAYDD8LOK 

PAYLOAO 

SB 

SDB 

SEEBUF 

WINGMAN 

b.  Description 

The  Red  Flight  Data  Structures  control  the  actions  of  Red 

2 

Flights.  In  addition  to  the  three  command/control  blocks  C  ,  SB  and  SDB, 
Red  Flights  also  use  three  lists.  These  lists  include:  the  PERCEPTIONS 
LIST,  the  ORDERS  LIST  and  the  FLIGHT  STATUS  LIST. 

The  PERCEPTIONS  LIST  is  composed  of  a  buffer  and  a  singly- 
linked  list  of  ARCFSAW  blocks.  These  ARCFSAW  blocks  contain  information 
on  Blue  Targets  perceived  by  the  Red  Flight.  This  information  includes  the 
location  of  the  Blue  Targets  and  its  perceived  damage  level.  When  the 
Red  Flight  returns  to  its'  airbase  the  perceived  damage  to  Blue  Target  is 
transfered  to  the  Red  Theater  Planner's  STDBLOK  blocks.  Thus  damage 
perception  by  Red  Flights  are  transmitted  to  the  Red  Commander  for  sub¬ 
sequent  planning  activities. 
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The  ORDERS  LIST  is  composed  of  two  buffered  lists.  The 
first  is  made-up  of  up  to  six  COMMAND  blocks  which  specify  the  actions  to 
be  taken  by  the  flight  at  various  points  in  its  mission.  These  COMMAND 
blocks  determine  the  flight  geometry  and  mission  profile  for  the  flight. 

The  second  list  is  made  up  of  WINGMAN  blocks  which  contain  pointers  to  the 
SR  blocks  of  other  flights  in  the  other  Red  Flights  in  the  formation. 

The  FLIGHT  STATUS  LIST  consists  of  an  ARCFTSTATUS  block 
which  tracks  flight  status  and  a  set  of  two  MUNITIONS  LISTS  which  keep 
track  of  air-to-air  and  air-to-ground  ordnance  carried  by  the  Red  flight. 

The  ARCFTSTATUS  block  points  to  an  FLTOB  block  which  is  the  core  of  a 
FLIGHT  DATA  BASE  STRUCTURE.  This  structure  is  used  as  a  template  for 
construction  of  flights  of  specified  types.  It  provides  the  basic  aircraft 
characteristics  and  initial  payload  levels  used  to  create  and  operate  the 
FLIGHT. 

Both  the  FLIGHT  DATA  STRUCTURES  and  the  FLIGHT  DATA  BASE 
STRUCTURES  are  shown  in  the  structure  diagrams, 
c.  Structure  Overview 

1)  Structure  Diagrams  (Figure  1 1 1 - 1 9  &  III-20) 

2)  Block  Definitions 

a)  COMMAND/CONTROL  BLOCKS: 

C2  -  COMMAND/CONTROL  BLOCK.  Contains 

2 

unit  no,  type,  side,  and  C 
PTRS. 

SB  -  SCOREBOARD  BLOCK.  Contains 

hex  address,  unit  id,  PTR  to 
FEL  and  STAT. 

SDB  -  STATUS  DISPLAY  BLOCK.  Contains 

PTRS  to  perceptions  list 
(SEEBUF)  and  orders  list 
(ORDERS).  Subordinate  PTR  not 
used  by  Red  FLTS. 
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SDB  HEX 

L,,.  -T . £ - - — - . — - 

-!♦ 

(PERCEPTIONS  LIST)  (ORDERS  LIST) 
SEEBUF  ORDERS 

r  r  rT~n 

1  ARCPSAW  I  mMMa  i 


4 - 

L 

i*HEX 

p*S8 

“ 

ARCFSAW 

— 

♦HEX 

f«-SB 

COMMAND 

ARCFSAW 

■ 

- 

♦  HEX 

♦  SB 
l(TGT) 

r — 1 

FORMATION 

R^, 

I  WINGMAN 


(FLIGHT  STATUS  LIST) 

ARCFTSTATUS 

♦  . - 

-♦HEX 
— ♦  SB(AB) 
— »-SB<TGTI 
“ ►  F  LTDB 
(MUNITIONS  LISTS) 
MUN 


(AIR-AIR) 

LOAD 


-S8(FLT) 
►SB(FLT) 
-SB(FLT) 
►  SB(F  LT) 


PAYLOAD 


PAYDDBLOK 


(AIR-GROUND) 

LOAD 

PAYLOAD 


PAYDDBLOK 


—  I  PAYDDBLOK 


PAYLOAD 


PAYDDBLOK 


4368/7 9W 


Figure  III-19.  Red  Flight  Structure  Diagram 
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b)  FLIGHT  STATUS  LIST 

ARCFTSTATUS  -  FLIGHT  STATUS  BLOCK.  Contains 

basic  flight  status  information 
includes  PTRS  to  starting, 
ending  and  next  hex  address  in 
current  move.  Also  includes 
PTRS  to  home  base  and  TGT 
SB's,  a  status  word,  and 
current  fuel,  altitude,  speed, 
and  direction. 

MUN  -  MUNITIONS  LISTS  BUFFER  BLOCK. 

Buffer  for  air-to-air  and 
air-to-ground  munitions  lists 

PAYLOAD  -  PAYLOAD  CLASS  DESCRIPTION  BLOCK. 

Basic  payload  parameters  for 
class  of  ordinance.  Contains 
class  type,  max  and  min  amounts 
and  max  fire  range.  Also 
includes  PTR  to  a  list  of 
attached  ordnance  types  of  the 
same  class. 

PAYDOBLOCK  -  PAYLOAD  TYPE  DATA  BASE  BLOCK. 

Contains  PTR  to  next  PAYDDBLOK 
and  type  of  ordnance. 

LOAD  -  PAYLOAD  LIST  BUFFER.  Used  to 

break  payloads  into  types  and 
keep  track  of  ammunition  load 
weight. 

c)  PERCEPTIONS  LIST 

SEEBUF  -  PERCEPTIONS  LIST  BUFFER  BLOCK 

ARCFSAW  -  AIRCRAFT  PERCEPTION  BLOCK. 

Contains  information  on  entity 
perceived  by  a  flight.  Includes 
PTR  to  hex  and  SB  of  entity. 
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d)  ORDERS  LIST 
ORDERS 


COMMMAND 


FORMATION 


WINGMAN 


3)  FLIGHT  DATA  BASE 
FLTD8 


PAYLOAD 


PAYLDDBLOK 

AQDB 


ACDB 


ORDERS  LIST  BUFFER  BLOCK. 
Contains  no  of  orders  remaining 
COMMAND  DESCRIPTION  BLOCK. 
Describes  command  to  be  followed 
by  flight  at  specific  address. 

Up  to  six  in  the  list 
FORMATION  BUFFER  BLOCK. 

Contains  number  of  fits  in  the 
formation  to  which  the  flight 
belongs. 

WINGMAN  LIST  BLOCK.  Contains 
PTR  to  other  fits  in  the 
formation 

FLIGHT  DATA  BASE  BLOCK. 

Contains  basic  flight  description 
including  No.  of  payloads, 
maximum  no  of  A/C,  minimum  no. 
of  A/C,  and  Multac,  SPFLTC 
(SPACE,  DISTSER(SPACE) 

PAYLOAD  DESCRIPTION  BLOCK. 

Contains  payload  clac:  (NRPDGLS) 
max  and  min  amount  of  payload, 
and  max  fire  range 
PAYLOAD  TYPE  BLOCK.  Contains 
payload  type  index 
ACQUISITION  DEVICE  DATA  BASE  BLOCK. 
Contains  type  index  and  range 
of  aquisition  device. 

AIRCRAFT  DATA  BASE  BLOCK. 

Contains  A/C  characteristics 
such  as  speed,  max  range,  etc. 
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PROF I LEOBLOK  - 


Block  Specifications 
1 )  Block  Diagrams 


UNITNUMBER 

PUP 

PDOWN 

PSB 

PNEXT 

UNITTYPE 

SIDE 

b)  SB 


ADDRESS 

PC2 

PACQ 

ID 

DATABASE 
_ _ _ 

PABSTATUS 

+  PARCFTSTAT  ! 
+  PBOCSTAT  ' 
+  STATUS  ! 


SDB 

PSB 

PSEEBUF 

1 

!  + 

1 

PSEE 

SUBORDINATE 

ORD 

•  + 

PRAID 

SEEBUF 

PTRSEE 

NUNITS 

ARCFSAW 

PNEXT 

PSB 

ADDRESS 

TYPE 

DAMAGE  (SPACE) 

ORDERS 

PTRFORMS 

PTRACT 

MISSION  PROFILE  BLOCK.  Contains 
flight  altitude  levels  for 
three  phases  of  mission  -  Alt. 
to  corridor  entrance,  alt  to 
tgt,  and  alt  from  tgt  to  air 
base. 
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g) 


COMMAND 


PNEXT 

NVMACTS 

TMFLG 

ADDRESS 

TIME  (SPACE) 

ACTION 

h)  FORMATION 


PFORM 

NUMFLTS 

WINGMAN 

PNEXT 

PSB 

j)  AFCFTSTATUS 


m 

PNUMITIONS 

PSTRTHX 

PENDHX 

PNXTHX 

PAIRBASE 

CNTRLMODE 

PAIRTGT 

PGNOTDG 

NUMAIRCRAFT 

!■■■■■■ 

DUMMY 

|  JAMS TAT 
GRNDATK 


;  |  AIRCOMBAT  , 

;  ORBITSTAT  ! 

'  i 

.  LANDING  i 

I  1 

;  PROFILENOX  [ 

!  ALTUDECHNG  ' 

I  • 

!  INTERCEPTSTATUS  1 

F  LI  TE  LEG _ ' 

FUEL  (SPACE) _ 

ALTITUDE  (SPACE) _ 

SPEED  (SPACE) _ 

DIRECTION  (SPACE) _ 

k)  MUN _  j 

PAG 
PAA 


NUMAG 

NUMAA 


LOAD 

PNEXT 

TYPE 

AMOUNT 

P0RDD8 

m)  FLTDB 


PNXFLDB 

PTYPLOS 

PTYAQOB 

MAX NO AC 

MULTAC 

NRFLJTE 

NOPYLDS 

PTACDB 

MINNOAC 

PROFILE 

SPFLTC  (SPACE) 

DISTSEP  (SPACE) 

PAYLOAD 

PNXTYPO 

NRPDCLS 

MAXAMT 

MINAMT 

MAXF1RE  RANGE  PAYLDDB 


q)  PROFILEDBLOK 

PNXPROB  NRPROFL 

ALTCREN  (SPACE) _ 

ALTOAB  (SPACE) _ 

r)  ACDB 

NEXT  NRACTYPE 
"max's PEED  (SPACE) 
CRUISESPEED  (SPACE) 
MAXALTITUOE  (SPACE) 
MINALTITUDE  (SPACE) 
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MAXCLIMBDIVE  (SPACE) 
FUELCONSUME  (SPACE) 
ACQRANGE  (SPACE) 
RADARCS  (SPACE) 
ATTACKRADIUS  (SPACE) 
MAXFUEL  (SPACE) 

2)  Field  Definitions 
a)  C2  Block 


UNITNUMBER 

Number  of  the  unit. 

PUP 

Pointer  to  the  C2  block  of  the 
unit's  commander. 

PDOWN 

Pointer  to  the  C2  block  of  the 
unit's  subordinate. 

PNEXT 

Pointer  to  the  C2  block  of  the 
unit's  sibling. 

PSB 

Pointer  to  the  SB  block  of  the 

unit. 

UNITTYPE 

The  unit's  type  cade  (128) 

SIDE 

SB  Block 

Unit  Affiliation.  2  -  Red 

(PACT) 

ADDRESS 

Pointer  to  HEX  block  of  the 

HEX  in  which  the  unit  is 

located. 

PL2 

Pointer  to  C2  block  of  the 
unit. 

PSDB 

Pointer  to  the  SDB  block  of 

the  unit. 

PFEL 

Pointer  to  future  event  list  EVENT 

block. 

PACQ 

Pointer  to  ACQBUF  block.  Used  by 
CRC's  for  acquisition  devices. 
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ID  -  Identification  number 

DATABASE  -  If  BOC  or  BTRY  points  to  ADSITEDB 

block. 

PABSTATUS  -  Points  to  ABSTATUS  block  if  the  unit 
is  an  air  base. 

+PARCFTSTAT  -  Points  to  ARCFSTATUS  block  if  the 
unit  is  a  flight  of  aircraft. 

+PD0CSTAT  -  Points  to  BOCSTAT  block  if  the  unit 
is  a  battalion  operations  center. 

+PBTRYSTAT  -  Points  to  BTRYSTAT  block  if  the  unit 
is  an  antiaircraft  battery. 

♦STATUS  -  Alternative  field  definition, 

c)  SOB  81ock 

PSB  -  Pointer  to  the  unit's  SB  block. 

PSEEBUF  -  Pointer  to  SEEBUF  block  which  is 

is  used  only  by  flights. 

+PSEE  -  Pointer  to  CRCEES  block  which  is 

used  by  CRC  units  to  record  the 
blue  and  red  flights  it  sees.  Also 
used  by  the  BIC  as  a  pointer  to  its 
assigned  target  block.  TARGETLISTBLOK. 

SUBORDINATE  -  Points  to  different  types  of  subordinate 
description  or  target  description 
blocks  depending  upon  the  unit  type. 
Possible  unit  type  vs.  field  use 
combination  are  as  follows: 

UNIT  TYPE  SUBORDINATE  POINTS  TO 

CRC  SUB 

BOC  SUBLIST 

BTRY  FIREUNIT 

ORD  -  Points  to  ORDERS  block  if  the  unit 

is  a  flight. 
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+PRAID  -  Points  to  the  RAIDBLOK  if  the  unit 

is  the  Red  Theater  Commander. 

d)  SEEBUF  BLOCK 

PTRSEE  -  Pointer  to  ARCFSAW  block,  (first  in 

list) 

NUNITS  -  Number  of  ARCFSAW  blocks  in  the  list 

Corresponds  to  number  of  targets 
perceived. 

e)  ARCFSAW  BLOCK 

PNEXT  -  Pointer  to  next  ARCFSAW  block  in 

the  list. 

PSB  -  Pointer  to  SB  block  of  target. 

ADDRESS  -  Pointer  to  HEX  block  in  which  target 

is  located. 

TYPE  Unit  type  code  of  target. 

DAMAGE  -  Perceived  damage  level  of  the  target 

Real  variable. 

f)  ORDERS  BLOCK 

PTRFORMS  -  Pointer  to  FORMATION  block. 

PTRACT  -  Pointer  to  COMMAND  block. 

g)  COMMAND  BLOCK 

PNEXT  -  Pointer  to  next  command  block 

NUMACTS  -  Number  of  the  command  in  the  list. 

TMFLG  -  Time  flag.  If  1  at  time  is 

associated  with  the  command. 

ADDRESS  -  Pointer  to  HEX  block  in  which  the 

command  is  to  be  carried  out. 

TIME  -  Time  the  command  is  to  be  performed. 

ACTION  -  Command  or  action  code. 

h)  FORMATION  BLOCK 

PFORM  -  Pointer  Lo  first  WINGMAN  block  in 

the  list. 
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NUMFLTS  -  Number  of  WINGMAN  blocks  in  the  list. 

Corresponds  to  number  of  flights  in 
the  formation. 

i)  WINGMAN  BLOCK 

PNEXT  -  Pointer  to  next  WINGMAN  block  in  the 

1  i  st. 

PS8  -  Pointer  to  the  SB  block  of  the 

f 1 ight. 

j)  ARCFTSTATUS  BLOCK 

PFLTOB  -  Pointer  to  FLTDB  block 

PMUNITIONS  -  Pointer  to  NUM  block 
PSTRTHX  -  Pointer  to  HEX  block  in  which 
current  move  begins 

PENDHX  -  Pointer  to  HEX  block  in  which 

current  move  ends 

PNXTHX  -  Pointer  to  next  HEX  block 

PAIRBASE  -  Pointer  to  SB  block  of  flight's  home 

air  base. 

CNTRLMOOE  - 

PAIRTGT  -  Pointer  to  SB  block  of  airborn  target. 

PGNDTGT  -  Pointer  to  SB  block  of  ground 

target. 

NVMAIRCRAFT  -  Number  of  aircraft  in  the  flight. 

FLITELEG 

INTERCEPtSTATUS 

ALTUDCHNG 

PROFILENDX 

LANDING 

ORBITSTAT 

AIRCOMBAT 

JAMSTAT 

FUEL  -  Current  fuel  level.  Real  variable 
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k) 


1) 


m) 


ALTITUOE  - 
SPEED 

DIRECTION  - 
MUM  BLOCK 
PAG 
NUMAG 

PAA 

NUMAA 

LOAD  BLOCK 
PNEXT 

TYPE 
AMOUNT 
PORDDB 
FLTDB  BLOCK 
PBXFLDB  - 
NRFLITE  - 
PTYPLDS  - 

NOPYLDS 

PTYAQDB 

PTACDB 

MAXNOAC 

MINNOAC 

MULTAC 

PROFILE  - 


Altitude  in  meters.  Real  variable 
Speed.  Real  variable 
Direction.  Real  variable 

Pointer  to  ground  attack  LOAD  block 
Number  of  LOAD  blocks  in  ground 
attack  munitions  list 
Pointer  to  air  attack  LOAD  block 
Number  of  LOAD  blocks  in  air  attack 
numitions  list 

Pointer  to  next  LOAD  block  in  the 
1  i  st 

Munitions  class 

Amount  of  munitions  in  tons 

Pointer  to  PAYLOAD  block 

Pointer  to  next  FLTDB  block 
Unique  flight  specification  number 
Pointer  to  PAYLOAD  data  block 
Payload  class  6002 
Number  of  PAYLOAD  data  blocks 
Pointer  to  ACQUISITION  data  block 
(AQDB),  Class  6007) 

Pointer  to  aircraft  specification 
data  block  (ACDB ,  CLASS  6003) 

Maximum  number  of  aircraft  in  flight 
Minimum  number  of  aircraft  in  flight 
Multiples  of  aircraft  required  for 
fl ight 

Pointer  to  profile  specification 
data  block  (Profiled  blok,  class  6005) 
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SPFITC(SPACE)  Flight  crusing  speed  in  meters/second 
( real ) 

QISTSEP(SPACE)  Flight  separation  distance  in  meters 
(real ) 

n)  PAYLOAD  BLOCK 

PNXTYPD  -  Pointer  to  next  payload  block 

NRPDCLS  -  Payload  type,  must  be  3  or  4 

3  =  air-to-ground 

4  =  air-to-air 

MAXAMT  -  Maximum  number  of  loads  of  this 

payload 

MINAMT  -  minimum  number  of  loads  of  this 

payload 

MAXFIRERANGE  Future  use  by  an  enhancement  for 
maximum  fire  range  for  engagements 
greater  than  one  hex 

PAYL008  -  Pointer  to  payload  ID  data  block 
(PAYLDDBLOK) 

o)  PAYLQQ8L0K  BLOCK 

NEXT  -  Pointer  to  next  10  block 

TYPEINOEX  -  Payload  ID,  unique  within  each 

payload  type 

p)  AQDB  BLOCK 

NEXT  -  Pointer  to  next  AQDB  block 

NRAQTYP  -  Unit  type 

RANGE(SPACE)  Acquisition  range  in  meters  (real) 

NOUSE  1  -  Not  used 

NOUSEZ  -  Not  used 

q)  PR0FILE06L0K  BLOCK 

PNXPRQB  -  Pointer  to  next  PR0FILED8L0K 

NRPROFL  -  Profile  identification  number, 

must  be  unique  within  the  6005  class 

i 


ALTCREN  - 
ALTQTGT  - 

ALTOAB 
ACDB  BLOCK 
NEXT 

NRACTYPE  - 
MAXSPEED  - 
CRUISESPEED 

MAXALTITUDE 

MINALTITUDE 

MAXCLIMBDIVE 

FUELCONSUME 

ACQRANGE  - 
RADARCS  - 
ATTACKRADIUS 
MAXFUEL  - 


Altitude  of  first  leg  in  meters  (real 
Altitude  of  second  leg  in  meters 
(real ) 

Altitude  of  third  leg  in  meters  (real 

Pointer  to  next  ACD8  block 
Aircraft  type  number 
Maximum  speed  in  meters/second  (real) 
Cruising  speed  in  meters/second 
(real ) 

Maximum  altitude  in  meters  (real) 
Minimum  altitude  in  meters  (real) 
Maximum  climb/dive  rate  in  meters/ 
seconds  (real) 

Fuel  consumption  rate  in  hexes/second 
(real ) 

Acquisition  range  in  meters  (real) 
Radar  cross  sections  in  hexes  (real) 
Attack  radius  in  meters  (real) 

Maximum  fuel  load  in  hexes  (real) 


G.  BLUE  STRUCTURES 

In  contrast  to  Red  Structures  which  are  dominated  by  threat  plan¬ 
ning  related  structures,  Blue  Structures  are  all  related  to  some  type  of 

combat  entity  or  player.  Seven  of  those  player  types  are  connected  to  the 
2 

BLUE  C  tree,  while  the  eight  is  connected  to  the  passive  target  list. 
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1.  ALLIED  TACTICAL  AIR  FORCE  (ATAF) 


a.  DATA  BLOCK  INDEX 
C2 

SB 

SND 

b.  DESCRIPTION 

The  ALLIED  TACTICAL  AIR  FORCE  structure  resides  at  the  top 
of  the  blue  C2  TREE  (see  E.2.f).  It  is  currently  used  only  to  maintain  the 
consistency  of  the  blue  command/control  structure  and  does  not  initiate 
actions  in  the  course  of  the  simulation. 


c.  STRUCTURE  OVERVIEW 

1)  STRUCTURE  DIAGRAM  (Figure  III-21) 


j - PTRBLUE 

PLBUFFER 


Figure  1 1 1 -21 .  Allied  Tactical  Air  Force  Structure  Diagram 


2)  BLOCK  DEFINITIONS 
PLBUFFER 


C2 


SB 


C2  TREE  BUFFER  BLOCK.  Contains 
pointer  to  the  tree  and  the  side 
of  the  tree 

COMMAND/CONTROL  BLOCK.  Contains 
tree  pointers,  unit  number, 
pointer  to  scoreboard  (SB),  unit 
type  code  and  side 
SCOREBOARD  BLOCK.  Contains 
pointers  to  C2  and  HEX  blocks, 
and  the  status  display  board 
(SDB).  Also  contains  pointers 
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SDB 


d.  8L0CK  SPECIFICATIONS 

1)  P LBUFFER _ 

|  PTRPL  1  VARIWQRD 


to  acquisition  devices,  various 
unit  status  blocks  and  the  fut¬ 
ure  event  list.  Use  varied 
with  unit  type. 

STATUS  DISPLAY  BOARD  BLOCK.  Con¬ 
tains  subordinate,  acquisition 
and  order  pointers.  Use  varies 
with  unit  type 


2)  C2 


UNITNUMBER 

PUP 

PDOWN 

PSB 

PNEXT 

UNITYPE 

SIDE 

NOTE:  +  ALTERNATE 
DEFINITION  OF  FIELD 


3)  SB 


ADDRESS 

PC  2 

PSDB 

PFEL 

PACQ 

ID 

DATABASE 

PABSTATUS 

+  PARCFTSTAT 

+  PBOCSTAT  I 

+  PBTRYSTAT  , 

+  STATUS  i 


4) 

SDB 

PSB 

PSEEBUF 

+ 

PSH  | 

SUBORDINATE 

ORD  ] 

1 

i 

+ 

PRAID  | 

I 


FIELD  DEFINITIONS 

1) 

PLBUFFER  BLOCK 

PTRPL 

Pointer  to  C2  Block 

VARWORD 

Side  indicator  for  tree 

1  =  BLUE  (NATO) 

2  =  RED  (PACT) 

2) 

C2  BLOCK 

Number  of  the  unit.  If  nega¬ 
tive,  the  unit  is  a  passive 

target 

PUP 

Pointer  to  the  C2  block  of  the 

unit's  commander 

POOWN 

Pointer  to  the  C2  block  of  the 

unit's  sibling 

PSB 

Pointer  to  the  SB  block  of  the 

uni  t 

UNITTYPE 

The  unit's  type  code  (see  sub¬ 
section  6). 

SIDE 

Unit  affiliation 

1  =  BLUE  (NATO) 

2  =  RED  (PACT) 

3) 

SB  BLOCK 

ADDRESS 

Pointer  to  HEX  block  of  the  hex 

in  which  the  unit  is  located 

PC2 

Pointer  to  C2  block  of  the  unit 

PSDB 

Pointer  to  the  SDB  block  of  the 

uni  t 

PFEL 

Pointer  to  future  event  list 

EVENT  block 

PACQ 

Pointer  to  ACQBUF  block.  Used 

by  CRC's  for  acquisition  devices 
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ID 

DATABASE 


Identification  number 
If  BOC  or  BTRY  points  to 
ADSITEDB  block 

PABSTATUS  -  Points  to  ABSTATUS  block  if  the 

unit  is  an  airbase 

+PARCFTSTAT  -  Points  to  ARCFTSTATUS  block  if 

the  unit  is  a  flight  or  aircraft. 

+PB0CSTAT  -  Points  to  BQCSTAT  block  if  the 

unit  is  a  battalion  operations 
center 

TPBTRYSTAT  -  Points  to  BTRYSTAT  clock  if  the 

unit  is  an  anti-aircraft  battery 

+STATUS  -  alternative  field  definition 

SDB  BLOCK 

PSB  -  Pointer  to  the  unit's  SB  block 

PSEEBUF  -  Pointer  to  SEEBUF  block  which 

is  used  by  aircraft  flight  units 

to  record  targets  seen  and  their 
perceived  damage  levels.  This 
field  definition  is  used  only 
by  flights 

+PSEE  -  Pointer  to  CRCEES  block  which  is 

used  by  CRC  units  to  record  the 
blue  and  red  flights  it  sees. 

Also  used  by  the  RTC  to  point 
to  its1  assigned  target  list. 
TARGET  LISTBOOK 


157 


SUBORDINATE 


Points  to  different  types  of 
subordinate  description  or 
target  description  blocks 
depending  upon  the  unit  type. 
Possible  unit  type  vs  field  use 
combinations  are  as  follows: 


UNIT  TYPE 

SUBORDINATE  POINTS  TO 

CRC 

SUB 

BOC 

SVBUST 

BTRY 

FIREUNIT 

0R0  -  Points  to  ORDERS  block  if  the 

unit  is  a  flight 

+PRAID  -  Points  to  the  RAIDBLOK  if  the 

unit  is  the  Red  theater  com¬ 
mander 
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2.  SECTOR  OPERATIONS  CENTERS  (SOC) 

a.  DATA  BLOCK  INDEX 
C2 

SB 

SDB 

b.  DESCRIPTION 

The  SECTOR  OPERATIONS  CENTER  structures  reside  on  the  Blue  C2 
tree  on  the  Blue  C2  tree  on  the  level  below  the  ATAF.  Like  the  ATAF,  they 
are  currently  used  only  to  maintain  the  consistency  of  the  Blue  command/control 
structure.  SOC's  do  not  initiate  actions  in  the  course  of  the  simulation. 


c.  STRUCTURE  OVERVIEW 


Figure  III-22.  Sector  Operations  Center  Structure  Diagram 

2)  BLOCK  DEFINITIONS 

PLBUFFER  -  C2  Tree  Buffer  Block.  Contains 

pointer  to  the  tree  and  to  the 
side  of  the  tree 

C2  -  Command/Control  Block.  Contains 

tree  Pointers,  unit  number,  pointer 
to  scoreboard  (SB) .  unit  type  code 
and  side 

SB  -  Scoreboard  Block.  Contains  pointers 

to  C2  and  HEa  blocks,  and  the  status 
display  board  (SDB).  Also  contains 
pointers  to  acquisition  devices, 
various  unit  status  blocks  and  the 
future  EVENT  list.  Use  varies  with 
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SDR 


unit  type 

Status  Display  Board  Block.  Con¬ 
tains  subordinate,  acquisition  and 
order  pointers.  Use  varies  with 
unit  type 


d. 


BLOCK  SPECIFICATIONS 
1)  BLOCK  DIAGRAMS 


a)  C2 


UNITNUMB 

:R 

PUP 

PDOWN 

PSB 

PNEXT 

UNITYPE 

SIDE 

b) 

SB 

ADDRESS 

PC2 

PSDB 

PFEL 

PACQ 

ID 

DATABASE 

PABSTATUS 

|  + 

PARCFTSTAT 

I 

.  + 

PBOCSTAT 

i 

i  + 

PBTRYSTAT 

; 

STATUS 

J 

c) 

SDB 

PSB 

PSEEBUF 

i 

PSEE 

i 

SUBORDINATE 

ORD 

i  + 

• _ _ _ .  _ 

PRAID 

i 

+  ALTERNATE  DEFINI¬ 
TION  OF  FIELD 
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2)  FIELD  DEFINITIONS 

a)  C2  BLOCK 
UNITNUMBER 

PVP 

PDOWN 

PNEXT 

PSB 

UNITVPE 

SIDE 

b)  sB  BLOCK 
ADDRESS 

PC2 

PSDB 

PFEL 

PACq 

ID 


Number  of  the  unit.  If 
negative,  the  unit  is  a 
passive  target 
Pointer  to  the  C2  block 
of  the  unit's  commander 
Pointer  to  the  C2  block 
of  the  units' s  subordinate 
Pointer  to  the  C2  block 
of  the  unit1 s  sibl ing 
Pointer  to  the  SB  block 
of  the  unit 
The  unit's  type  code 
(see  subsection  5)) 

Unit  affiation 

1  =  BLUE  (NATO) 

2  =  RED  (PACT) 

Pointer  to  HEX  bock  of 
the  hex  in  which  the 
unit  is  located 
Pointer  to  C2  block  of 
the  unit 

Pointer  to  the  SDB  block 
of  the  unit 

Pointer  to  future  event 
list  EVENT  block 
Pointer  to  ACQBUF  block. 
Used  by  SRC ' s  for  acauisi- 
tion  devices. 
Identification  number 


161 


DATABASE 


If  BOC  or  BTRY  points  to 
ADSITEDB  block 

PABSTATUS  -  Points  to  ABSTATUS  block 

if  the  unit  is  an  airbase 

+PARCFTSTAT  -  Points  to  ARCFTSTATUS  block 

if  the  unit  is  a  flight  of 

ai rcraft 

+PB0CSTAT  -  Points  to  BOCSTAT  block  if 

the  unit  is  a  battalion 
operation  center 

+PBTRYSTAT  -  Points  to  BTRYSTAT  block  if 

the  unit  is  an  antiaircraft 
battery 

+STATUS  -  Alternative  field  definition 

c)  SDB  BLOCK 

PSB  -  Pointer  to  the  unit's  SB 

block 

PSEEBUF  -  Pointer  to  SEEBUF  block 

which  is  used  by  aircraft 
flight  units  to  record 
targets  seen  and  their 
perceived  dmamage  levels. 
This  field  definition 
is  used  only  by  flights. 

+PSEE  -  Pointer  to  CRCEES  block 

which  is  used  by  CRC  units 
to  record  the  blue  and  red 
flights  it  sees.  Also  used 
by  the  RTC  to  point  to  its' 
assigned  target  list. 

TARGET  LIST  BLOCK 
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SUBORDINATE 


ORD 

+  PRAID 


Points  to  different  types  of 
subordinate  description  or  tar¬ 
get  description  blocks  depend¬ 
ing  upon  the  unit  type.  Poss¬ 
ible  unit  type  vs  vield  use 
combinations  are  as  follows: 
UNIT  TYPE  SUBORDINATE  POINTS  TO 

CRC  SUB 

BOC  SUBLIST 

BTRY  FIREUNIT 

Points  to  ODERS  block  if  the 

unit  is  a  fl ight 
Points  to  the  RAIDBLOK  if  the 
unit  is  the  Red  theater  commander 


e.  LINEAGES  TO  OTHER  DATA  STRUCTURES 

Pointer  to  HEX  block  in  which  unit  is  located 

f.  NOTES 
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3.  COMBAT  REPORTING  CENTERS  (CRC) 

a.  DATA  BLOCK  INDEX 
ACQBUF 
ACQOEVICE 

C2 

CACSEEBLUE 

CRCSEERED 

CRCSEES 

CRCSUBORD 

SB 

SDB 

SEER 

SUB 

SUBTYPE 

b.  Description 

The  COMBAT  REPORTING  CENTERS  are  the  highest  ranking  active 
players  on  the  Blue  side.  In  addition  to  the  basic  command  control  struc¬ 
tures  (C2,  SB  and  SDB),  CRC's  posess  three  unique  lists  -  the  PERCEPTIONS 
LIST,  the  SUBORDINATE  LIST,  and  the  ACQUISITION  LIST. 

The  ACQUISITION  LIST  is  used  to  keep  track  cf  acquisition 
devices  belonging  to  the  CRC.  The  SUBORDINATE  LIST  is  used  to  keep  track 
of  the  CRC's  subordinate  blue  units  (including  FLIGHTS).  These  lists  are 
stratified  by  device  and  subordinate  type  respectively. 

The  PERCEPTION  LIST  consists  of  two  branches.  One  keeps 
track  of  Red  Units  and  the  Blue  Units  perceiving  them.  The  other  keeps 
track  of  Blue  Units  perceived  by  the  CRC  directly.  It  is  important  to 
note  that  the  CRC  may  perceive  enemy  units  through  its  subordinates.  The 
overall  configuration  of  the  CRC  structure  is  shown  in  the  structure 
di agram. 

c.  Structure  Overview 

1 )  Structure  Diagram  (Figure  III-23) 


Block  Definitions 
C2 


SB 


SDB 


ACQBUF 


ACQDEVICE 


AQDB 


SUB 


COMMAND/CONTROL  BLOCK.  Con¬ 
tains  tree  pointers,  unit  num¬ 
ber,  pointer  to  scoreboard  (SB), 
unit  type  code  and  side. 

SCOREBOARD  BLOCK.  Contains 
2 

pointers  to  C  and  HEX  blocks, 
and  the  status  display  board 
(SDB).  Also  contains  pointers 
to  acquisition  devices  various 
unit  status  blocks  and  the 
future  event  list.  Use  varies 
with  unit  type. 

STATUS  DISPLAY  BOARD  BLOCK. 
Contains  subordinate,  acquisi¬ 
tion  and  order  pointers.  Use 
varies  with  unit  type. 
ACQUISITION  DEVICE  LIST  BUFFER. 
Contains  a  pointer  to  the  device 
list  and  the  number  of  devices 
(ACQDEVICE  BLOCKS)  in  the  list. 
ACQUISITION  DEVICE  DESCRIPTION 
BLOCK.  Contains  device  code, 
operating  status  and  a  pointer 
to  the  next  ACQDEVICE  block  in 
the  list. 

ACQUISITION  DEVICE  DATA  BASE 
BLOCK.  Basic  data  on  specific 
acquisition  device. 

SUBORDINATE  LIST  BUFFER.  Con¬ 
tains  a  pointer  to  the  subor¬ 
dinate  list  and  the  number  of 
subordinate  types  (SUBTYPE 
BLOCKS)  in  the  list. 
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SUBTYPE  -  SUBORDINATE  TYPE  BLOCK.  Con¬ 

tains  a  subordinate  type  code, 
the  number  of  subordinates  of 
that  type,  a  pointer  to  the 
next  SUBTYPE  and  a  pointer  to 
a  list  of  specific  subordinate 
unit  blocks  (CRCSUBORD). 

CRCSUBORD  -  CRC  SUBORDINATE  BLOCK.  Contains 

unit  ID  of  the  subordinate,  a 
pointer  to  its  SB  block  and 
HEX  block,  and  a  pointer  to  the 
next  CRCSUBORD  block  in  the  list. 

CRCSEES  -  CRC  PERCEPTIONS  LIST  BUFFER 

BLOCK.  Contains  pointers  to 
Red  and  Blue  branches  and  the 
number  of  units  (CRCSEERED  and 
CRCSEEBLUE  BLOCKS)  in  each 
branch. 

CRCSEERED  -  RED  UNIT  PERCEIVED  BLOCK.  Con¬ 

tains  a  description  of  Red  Unit 
perceived.  Includes  pointers 
to  its'  SB  and  HEX  blocks  as 
well  as  its'  direction  of  move¬ 
ment.  Also  contains  a  pointer 
to  a  list  of  Blue  units  which 
can  see  it. 

SEER  -  BLUE  PERCEPTION  UNIT  BLOCK. 

Contains  unit  ID  of  the  Blue 
Unit  perceiving  a  Red  Unit. 

CRCSEEBLUE  -  BLUE  UNIT  PERCEIVED  BLOCK. 

Contains  the  unit  ID,  SB  and 
HEX  block  pointers  of  a  Blue 
Unit  perceived  by  the  CRC. 
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Block  Specifications 
1 )  Block  Diagrams 

a)  C2 _ 

UNITNUMBER 


PUP 

PDOWN 

PSB 

PNEXT 

UNITTYPE 

SIDE 

)  SB 

ADDRESS 

PC2 

PSDB 

PFEL 

PACQ 

ID 

DATABASE 

PABSTATUS 

i _ 

PARCFTSTAT 

i  + 

' _ +_  _ 

1 

'  + 

PBOCSTAT 
PBJR_YST  AT  _ 
STATUS 

Note:  +  Alternate  Definition 
of  field. 


PSB  PSEEBUF 

+  PSEE 
SUBORDINATE joRD 
+  j  PRAID 
ACQBUF 

PTRACQ  1  NUMDEV 
ACQDEVICE 


PNEXT 

TYPE 

WORKING 

PACQDB 

JAM 

LEVEL 

AQDB 

NEXT  I 

NRAQTYP 

RANGE( SPACE) 

N0USE1 

N0USE2 


t 


g) 

SUB 

PSUB 

NUMBER 

h) 

SUBTYPE 

PNEXT 

TYPE 

PTRSUB 

NUMBER 

i) 

CRCSUBORD 

PNEXT 

ID 

PSB 

ADDRESS 

WORD  1 

WORD  2 

j) 

CRCSEES 

REDSEE 

NUMBERD 

BLUESEE 

NUMBLUE 

k) 

CRCSEERED 

PNEXT 

ID 

PSB 

ADDRESS 

RPT 

HUNTER 

DIRECTION  (SPACE) 

PNX 

NUM SEE 

1) 

SEER 

PNEXT 

ID 

m) 

CRCSEEBLUE 

PNEXT 

ID 

PSB 

ADDRESS 

2)  FIELD  DEFINITIONS 
a)  C2  BLOCK 

UNITNUMBER  -  Number  of  the  unit.  If 

negative  the  unit  is  a 
passing  target. 

2 

PVP  -  Pointer  to  the  C_  block  of 

the  unit's  commander. 

2 

PDOWN  -  Pointer  to  the  C_  block  of 

the  unit's  subordinate. 
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PNEXT 

PSB 

UNITTYPE 

SIDE 

b)  SB  BLOCK 
ADDRESS  - 

PC2 

PSDB 

PEEL 

PACQ 

ID 

DATABASE  - 

PABSTATUS  - 

+PARCFTSTAT- 

+PBOCSTAT  - 

+PBTRYSTAT  - 


Pointer  to  the  £_  block' of 
the  unit's  commander. 

Pointer  to  the  SB  block  of 
the  unit 

The  unit's  type  code  (see 
subsection  f) 

Unit  aff il iation. 

1  =  Blue  (NATO) 

2  =  Red  (PACT) 

Pointer  to  HEX  block  of  the  HEX 

in  which  the  unit  is  located. 

2 

Pointer  to  C  block  of  the  unit 
Pointer  to  the  SDB  block  of  the 
unit 

Pointer  to  future  event  list 
EVENT  BLOCK. 

Pointer  to  ACQBUF  BLOCK.  Used 
by  CRC's  for  acquisition 
devices. 

Identification  number 
If  BOC  or  BTRY  points  to 
ADSITEDB  block 

Points  to  ABSTATUS  block  if  the 

unit  is  an  airbase 

Points  to  ARCFTSTATUS  block  if 

the  unit  is  a  flight  of  aircraft. 

Points  to  BOCSTAT  block  if  the 

unit  is  a  battalion  operations 

center 

Points  to  BTRYSTAT  block  if  the 
unit  is  an  anti-aircraft  battery 
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+ STATUS 
+PBTRYSTAT  - 

♦STATUS 

c)  SOB  BLOCK 
PSB 

PSEEBUF  - 


+PSEE 


SUBORDINATE  - 


ORD 

+PRAID 


Alternative  field  definition 
Points  to  BOCSTAT  block  if  the 
unit  is  an  anti-aircraft 
Alternative  field  definition. 

Pointer  to  the  unit's  SB  block. 
Pointer  to  SEEBUF  block  which 
is  used  by  aircraft  flight  units 
to  record  targets  seen  and  their 
perceived  damage  levels.  This 
field  definition  is  used  only  by 
f 1 ights. 

Pointer  to  CRCEES  block  which 
is  used  by  CRC  units  to  record 
the  Blue  and  Red  flights  it 
sees.  Also  used  by  RTC  to  point 
to  its'  assigned  targets  list 
Points  to  different  types  of 
subordinate  description  or 
target  description  blocks 
depending  upon  the  unit  type. 
Possible  unit  type  vs.  field 
use  combinations  are  as  follows: 


UNIT  TYPE 

SUBORDINATE  POINTS  TO 

CRC 

SUB 

BOC 

SUBLIST 

BTRY 

FIREUNIT 

Points  to  ORDERS  block  if  the 
unit  is  a  flight 
Points  to  RAIDBLOK  if  the  unit 
is  the  Red  Theater  Commander. 
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d)  ACQBUF  BLOCK 

PTRACQ  -  Pointer  to  ACQDEVICE  block. 

NUMDEV  -  Number  of  ACQDEVICE  blocks 

in  the  1st. 

e)  ACQDEVICE  BLOCK 

PNEXT  -  Pointer  to  the  next  ACQDEVIDE 

block  in  the  list. 

TYPE  -  Acquisition  device  type  code 

WORKING  - 

PACQDB  -  Pointer  to  ACDB  block. 

JAM 

LEVEL 

f)  AQDB  BLOCK 

NEXT  -  Pointer  to  next  AQDB  block 

in  data  base 

NRAQTYP  -  Acquisition  device  type  code 

RANGE  -  Range  of  devide.  Real  variable 

N0USE1 
N0USE2 

g)  SUB  BLOCK 

PSUB  -  Pointer  to  SUBTYPE  block 

NUMBER  -  Number  of  SUBTYPE  blocks  in  the 

1  i  st 

h)  SUBTYPE  BLOCK 

PNEXT  -  Pointer  to  next  SUBTYPE  block 

TYPE  -  Subordinate  type  code 

PTRSUB  -  Pointer  to  CRCSUBORD  block 

NUMBER  -  Number  of  CRCSUBORD  blocks  in 

the  list 

i)  CRCSUBORD  BLOCK 

PNEXT  -  Pointer  to  next  CRCSUBORD  block 

ID  -  Unit  ID 
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PSB 

ADDRESS  - 

W0RD1 

W0RD2 

j)  CRCEES  BLOCK 
REDSEE 
NUMRED 

BLUESEE  - 
NUMBLUE  - 

k)  CRCSEERED  BLOCK 
PNEXT 

ID 

PSB 

ADDRESS  ' 

RPT 

HUNTER 
DIRECTION  - 

PNX 

NUMSEE 

l)  SEER  BLOCK 
PNEXT 

ID 

m)  CRCSEEBLUE  BLOCK 
PNEXT 

ID 

PSP 

ADDRESS 


Pointer  to  Unit's  SB  block 
Pointer  to  Unit's  HEX  block. 


Pointer  to  CRCSEERED  block 
Number  of  CRCSEERED  blocks 
in  the  list. 

Pointer  to  CRCSEEBLUE  blocks 
Number  of  CRCSEEBLUE  blocks 
in  the  list. 

Pointer  to  next  CRCSEERED  block 
Unit  ID. 

Pointer  to  Red  Unit's  SB  block 
Pointer  to  Red  Unit's  HEX  block 


Direction  of  travel,  real 
variable 

Pointer  to  SEER  block 
Number  of  SEER  blocks  in  the 
1  i  st 

Pointer  to  next  SEER  block 
Unit  ID  of  Blue  perceiver 

Pointer  to  next  CRCSEEBLUE 

block 

Unit  ID 

Pointer  to  Unit's  SB  block 
Pointer  to  Unit's  HEX  block 
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e.  LINKAGES  TO  OTHER  DATA  STRUCTURES 

The  CRC  STRUCTURE  is  linked  to  both  the  HEX  ADDRESS  TREE  and 
the  C2  TREES  of  both  sides. 

f.  NOTES 


I 

t 

I 


4.  BLUE  AIRBASES  (B-AB) 

a.  Data  Block  Index 
ABINFO 
ABQUEDB 
ABSTATUS 

ACDB 

C2 

QUEUES 

QUESTAT 

SB 

b.  Description 

BLUE  AIRBASE  STRUCUTRES  are  designed  to  keep  track  of  the 
number  and  type  of  aircraft  on  the  AIRBASE  as  well  as  the  status  of  each 
aircraft  type  in  terms  launch  capability.  The  overall  configuration  of 
these  structure  is  shown  in  the  structure  diagram. 

c.  Structure  Overview 

1 )  Structure  Diagram  (Figure  III-24) 

2)  Block  Definitions 


c2 

COMMAND  CONTROL  BLOCK.  Contains  unit 

2 

no.,  type  and  side,  and  C  PTRS. 

SB 

SCOREBOARD  BLOCK.  Contains  HEX  address 

PTR,  Unit  ID,  PTR  to  future  event  list 

for  the  unit,  and  ABSTATUS  PTR. 

SDB 

STATUS  DISPLAY  BLOCK.  Not  used  by 

ai rbase. 

ABSTATUS  - 

AIRBASE  STATUS  BLOCK.  Contains  PTRS  to 

the  airbase  information  list  (ABINFO) 

and  the  QUEUES  list  for  each  aircraft 

type  on  base. 

ABINFO 

AIRCRAFT  ON  BASE  INFORMATION  BLOCK. 

Contains  aircraft  type,  no  on  hand  and 

no.  in  each  service  queue,  and  a  PTR  to 
A/C  type's  ACDB. 
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SB  C2 


QUEUS 


QUEUES 

ABQUEDB 

QUESTAT 

ACDB 


AIRCRAFT  SERVICE  QUEUE  BLOCK 
AIRBASE  QUEUE  DATA  BASE  BLOCK 
QUEUE  STATUS  BLOCK. 

AIRCRAFT  DATA  BASE  8L0CK.  Operational 


parameters  of  A/C  type. 

Block  Specification 


1 )  Block  Diagrams 


UNITNUMBER 

PUP 

PDOWN 

PSB 

PNEXT 

UNITTYPE 

SIDE 

b)  SB 


ADDRESS 

PC2 

PSDB 

PFEL 

PACQ 

ID 

DATABASE 

PABSTATUS 

O  ABSTATUS 


PACTAB 

NOACTAB 

PTR2QUES 

NOACONAB 

A8DAMAGE( SPACE) 

d)  QUEUES 


NEXT 

QUENUM 

PTR 

NUMBER 

PQDB 

—  ■  -i 

PQUESTAT 

e)  QUESTAT 

~ VALUE(SPACE) 

f)  ABQUEDB 


PNEXT 

CLASS 

VALUE  1 

VALUE2 

VALUE3 

(SPACE) 

(SPACE) 

(APCE) 

_ i 
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Unit  affiliation 

1  =  Blue  (NATO) 

2  =  Red  (PACT) 


b) 

S8  BLOCK 

1 

ADDRESS 

- 

Pointer  to  HEX  block  in  which 

1 

unit  is  located. 

I 

PC2 

- 

2 

Pointer  to  C  block  of  the  unit. 

1 

PSOB 

- 

Pointer  to  SOB  block  (Inactive) 

1 

PFEL 

- 

Pointer  to  future  event  list 

1  ' 

for  the  unit. 

PACQ 

- 

Pointer  to  acquisition  devices 

V 

(inactive) 

J 

ID 

- 

Unit  ID  number 

1 

DATABASE 

- 

Pointer  to  database  block 

( i nacti ve) 

c) 

ABSTATUS  BLOCK 

PACTAB 

- 

Pointer  to  ABINFO  block. 

NOACTAB 

Number  of  ABINFO  blocks  in  the 

list  corresponds  to  number  of 

aircraft  on  the  base 

PTR2QUES 

- 

Pointer  to  QUEUES  BLOCK 

NOACONAB 

Number  of  QUEUES  blocks  in  the 

list.  Corresponds  to  number  of 
aircraft  types  on  the  base. 

ABDAMAGE 

Damage  level  of  base.  Real 

variable. 

d) 

QUEUES  BLOCK 

NEXT 

- 

Dointer  to  next  QUEUES  block 

in  the  list. 

QUENUM 

- 

QUEUE  number  (2  =  ready  queue) 

i 

PTR 

- 

NUMBER 

- 

PQOB 

- 

Pointer  to  ABQUEDB  block 

QPESTAT 

Pointer  to  QUESTAT  block 

► 

^  ,11 
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e)  QUESTAT  BLOCK 
VALUE 

f)  ABQUEDB  BLOCK 
PNEXT 

CLASS 

VALUE! 

VALUE 2 
VALUE3 

g)  ABINFO  BLOCK 
NEXT 
NRACTYP 
NOACOH 

PTRACDB 

NORMRQ 

NOREARMQ 

NOLAUNCHQ 

h)  ACDB  BLOCK 
NEXT 


NRACTYPE 

MAXSPEED 

CRUISESPEED 

MAXALTITUDE 

MAXCLIMBDIVE 

FUELCONSUME 

ACQRANGE 


Unknown,  real  variable 

Pointer  to  next  ABQUEDB  block 
Aircraft  class 


Pointer  to  next  ABINFO  block 
Aircraft  type  code 
Number  of  aircraft  of  type 
(NRACTYP)  on  hand  on  the  base. 
Pointer  to  ACDB  for  the  aircraft 
type  (NRACTYP) 

Number  in  repair  queue 
Number  in  rearm  queue 
Number  in  launch  queue 

Pointer  to  next  ACDB  block  in 
data  base  (not  used  in  this 
context) 

Aircraft  type  code 
Maximum  speed.  Real  variable 
Cruising  speed.  Real  variable 
Maximum  altitude.  Real  variable 
Maximum  rate  of  altitude  change. 
Real  variable. 

Fuel  consumption  rate.  Real 
variable. 

Acquisition  range.  Real 
variable. 
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e. 

f. 


present. 


RADARCS 

Radar  cross-section.  Real 

variable. 

ATTACKRADIUS  - 

Maximum  attack  range  of  air¬ 

craft.  Real  variable. 

MAXFUEL 

Maximum  fuel  capacity.  Real 

variable. 

Linkages  to  Other  Data  Structures 
Notes 

QUEUES  blocks  and  their  related  lists  are  not  used  at 
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a. 


Data  Block  Index 
ACDB 
AQDB 
ARCFSAW 
ARCFTSTATUS 
C2 

COMMAND 
FLTDB 
FORMATION 
LOAD 
MUN 

ORDERES 
PAYDDBLOK 
PAYLOAD 
SB 

SEEBUF 
WINGMAN 
b.  Description 

The  BLUE  FLIGHT  DATA  STRUCTURES  control  the  actions  of  blue 

2 

flights.  In  addition  to  the  three  command/control  blocks  C  ;  SB  and  SDB, 
BLUE  FLIGHTS  also  use  three  lists.  These  lists  include:  the  PERCEPTIONS 
LIST,  the  ORDERS  LIST  and  the  FLIGHT  STATUS  LIST. 

The  PERCEPTIONS  LIST  is  composed  of  a  buffer  and  a  singly- 
linked  list  of  ARCFSAW  blocks.  These  ARCFSAW  blocks  contain  information  on 
Red  flights  perceived  by  the  Blue  FLIGHT.  This  inforamtion  includes  the 
location  of  the  Red  targets.  When  the  Blue  FLIGHT  returns  to  its1  airbase 
the  perceived  damage  to  Red  Flights  is  transfered  to  the  Blue  CRC. 

The  ORDERS  LIST  is  composed  of  two  buffered  lists.  The 
first  is  made-up  of  up  to  six  COMMAND  blocks  which  specify  the  actions  to 
be  taken  by  the  flight  at  various  points  in  its'  mission.  These  COMMAND 
blocks  determine  the  flight  geometry  and  mission  profile  for  the  flight. 

The  second  list  is  made  up  to  WINGMAN  blocks  which  contain  pointers.  To 
the  S8  blocks  of  other  flights  in  the  other  Blue  FLIGHTS  in  the  formation. 


The  FLIGHT  STATUS  LIST  consists  of  an  ARCFTSTATUS  block 
which  tracks  flight  status  and  a  set  of  two  NUMITIONS  LISTS  which  keep 
track  of  air-to-air  and  air-to-ground  ordinance  carried  by  the  Red  Flight. 
The  ARCFSTATUS  block  points  to  an  FLTOB  block  which  is  the  core  of  a  FLIGHT 
DATA  BASE  STRUCTURE.  This  structure  is  used  as  a  template  for  construction 
of  flights  of  specified  types.  It  provides  the  basic  aircraft  character¬ 
istics  and  initial  payload  levels  used  to  create  and  operate  the  flight. 

Both  the  FLIGHT  DATA  STRUCTURES  and  the  FLIGHT  DATA  BASE 
STRUCTURES  are  shown  in  the  structure  diagrams, 
c.  Structure  Overview 

1 )  Structure  Diagrams  (Figures  I I I - 25  &  I I I - 26 ) 
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(PERCEPTIONS  UST) 


2) 


Block  Definitions 
COMMAND/CONTROL  BLOCKS 


SB 


SDB 


FLIGHT  STATUS  LIST 
ARCFTSTATUS 


MUN 


PAYLOAO 


COMMAND/CONTROL  BLOCK.  Contains 
Unit  No. ,  type,  side,  and  C^  PTRS 
SCOREBOARD  BLOCK.  Contains  HEX 
address,  unit  ID,  PTR  to  FEL 
and  STAT 

STATUS  DISPLAY  BLOCK.  Contains 
PTRS  to  perceptions  list  (SEEBUF) 
and  orders  list  (ORDERS).  Sub¬ 
ordinate  PTR  not  used  by  Red  FLTS 

FLIGHT  STATUS  BLOCK.  Contains 
basic  flight  status  information 
includes  PTRS  to  startin,  ending 
and  next  HEX  address  in  current 
.move.  Also  includes  PTRS  to 
homebase  and  TGT  SB's  a  status 
word,  and  current  fuel,  altitude, 
speed,  and  direction. 

MUNITIONS  LIST  BUFFER  BLOCK. 
Buffer  for  air  to  air  and  air 
to  ground  munitions  lists. 

PAYLOAD  CLASS  DESCRIPTION  BLOCKS. 
Basic  payload  parameters  for 
class  of  ordinance.  Contains 
class  type,  max  and  min  amounts 
and  max  fire  range.  Also  in¬ 
cludes  PTR  to  a  list  of  attached 
ordinance  types  of  the  same 
class. 
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PAYDDBLOK 


LOAD 

PERCEPTIONS 

SEEBUF 

ARCFSAW 

ORDERS  LIST 
ORDERS 

COMMAND 

FORMATION 

WINGMAN 


PAYLOAD  TYPE  DATA  BASE  BLOCK. 
Contains  PTR  to  next  PAYDDBLOK 
and  type  of  ordinance. 

PAYLOAD  LIST  BUFFER.  Used  to 
break  payloads  into  types  and 
keep  track  of  ammunition  load 
weight. 

LIST 

PERCEPTIONS  LIST  BUFFER  BLOCK 
AIRCRAFT  PERCEPTION  BLOCK. 
Contains  infomration  on  entity 
perceived  by  a  flight.  Includes 
PTR  to  HEX  and  SB  of  entity. 

ORDERS  LIST  BUFFER  BLOCK.  Con¬ 
tains  no.  of  orders  remaining. 
COMMAND  DESCRIPTION  BLOCK. 
Describes  command  to  be  followed 
by  flight  at  specified  address. 
Up  to  six  in  the  list. 

FORMATION  BUFFER  BLOCK.  Con¬ 
tains  number  of  fits  in  the 
formation  to  which  the  flight 
belongs. 

WINGMAN  LIST  BLOCK.  Contains 
PTR  to  other  fits  in  the  forma¬ 
tion. 


I 
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FLIGHT  DATA  BASE 
FLTDB 


PAYLOAD 

PAYLDDBLOK 

AQDB 

ACDB 

PROFILEDBLOK  - 


1 )  Block  Diagrams 


UNITNUMBER 

PUP 

PDOWN 

PSB 

PNEXT 

UNITTYPE 

SIDE 

FLIGHT  DATA  BASE  BLOCK.  Con¬ 
tains  basic  flight  description 
including  no.  of  payloads,  maxi¬ 
mum  no.  of  A/C,  minimum  No.  of 
A/C,  and  Multic  SPFLTC(SPACE, 
DISTSER( SPACE) 

PAYLOAD  DESCRIPTION  BLOCK.  Con¬ 
tains  payload  class  (NRPDCLS) 
max  and  min  amount  of  payload, 
and  max  fire  range 
PAYLOAD  TYPE  BLOCK.  Contains 
payload  type  index 
ACQUISITION  DEVICE  DATA  BASE 
BLOCK.  Contains  type  index  and 
range  of  acquisition  device. 
AIRCRAFT  DATA  BASE  BLOCK.  Con¬ 
tains  A/C  characteristics  such 
as  speed,  max  range  etc. 

MISSION  PROFILE  BLOCK.  Contains 
flight  altitude  levels  for  three 
phases  of  mission  -  ALT  to  cor¬ 
ridor  entrance,  ALT  to  TGT,  and 
ALT  from  TGT  to  Airbase. 


j 
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b) 


c) 


SB 


ADORESS 

PC2 

PSDB 

PFEL 

PACQ 

ID 

DATABASE 

PABSTATUS 

+  PARCFTSTATj 
+  PBOCSTAT  | 
+  PBTRYSTAT  | 
+  STATUS  i 


SDB 


PSB 


PSEEBUF 


+  PSEE 


SUBORDINATE 

ORD  i 

t 

1  _ 

I 

20 

■> 

'  ►—« 

1  ° 

d) 


SEEBUF 


PTRSEE 


NUNITS 


e)  ARC F SAW 


PNEXT 

PSB 

ADORESS 

TYPE 

DAMAGE  (SPACE) 

f) 

OROERS 

[ 

PTRFORMS 

PTRACT 

g) 

COMMAND 

PNEXT 

NUMACTS 

TMFLG 

ADDRESS 

TIME  (SPACE) 

ACTION 

h) 

FORMATION 

PFORM 

NUMFLTS 

k. 


i  )  WINGMAN 
I  PNEXT 


PSB 


AD-A107  916 

unclassified 
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r 


V 


j) 


ARCFTSTATUS 

PFLTOB 

PSTRTHX 

PNXTHX 

CNTRLMODE 

PGNOTGT 


PMUNITIONS 

PENDHX 

PAIRBASE 

PAIRTGT 

NUMAIRCRAFT 


DUMMY 


ft  ft  ft  '  ^AMSTAT 
3RNDATK 
AIRCOMBAT 
DRBITSTAT 
LANDING 
PROFILENDX 
ALTUOECHNG 
NTERCEPTSTATUS 
FLITELEG 


FUEL  (SPACE) 
ALTITUDE  (SPACE) 
SPEED  (SPACE-) 
DIRECTION  (SPACE) 


k)  MUN 


PAG 

NUMAG 

PAA 

NUMAA 

1 )  LOAD 


PNEXT 

TYPE 

AMOUNT 

PORDOB 

1)  FLTDB 


PNXFLDB 

NRFLITE 

PTYPLDS 

NOPYLDS 

PTYAQDB 

PTACDB 

MAXNOAC 

MINNOAC 

MULTAC 

PROFILE 

SPFLTC  (SPACE) 

DISTSEP  (SPACE) 
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n) 


o) 


q) 


r) 


PAYLOAD 


PNXTYPD 

NRPDCLS 

MAXAMT 

MINAMT 

MAXFIRERANGE 

PAYLODB 

PAYLDDBLOK 


NEXT 


TYPEINDEX 


p)  AQDB 


NEXT 


NRAQTYP 


RANGE  (SPACE) 


NOUSE1 


NOUSE2 


PROFILEDBLOK 


PNXPRDB 


NRPROFL 


ALTCREN  (SPACE) 


ALTOTGT  (SPACE) 


ALTOAB  (SPACE) 


ACDB 


NEXT 


NRACTYPE 


MAXSPEED  (SPACE) 


CRUISESPEED  (SPACE) 


MAXALTITUDE  (SPACE) 


MINALTITUDE  (SPACE) 


MAXCLIMBDIVE  (SPACE) 


FUELCONSUME  (SPACE) 


ACQRANGE  (SPACE) 


RADARCS  (SPACE) 


ATTACKRADIUS  (SPACE) 


MAXFUEL  (SPACE) 


2)  Field  Definitions 
a)  C2  BLOCK 

UNITNUMBER  - 
PUP 


Number  of  the  unit. 

2 

Pointer  to  the  C  block  of  the 
unit' s  commander. 
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PDOWN 


2 

Pointer  to  the  C  block  of  the 
unit's  sibling. 

PSB  -  Pointer  to  the  SB  block  of  the 

unit. 

UNITTYPE  -  The  unit's  type  code  (128) 

SIDE  -  Unit  affiliation 

2  =  Red  (PACT) 

SB  BLOCK 

ADDRESS  -  Pointer  to  HEX  block  of  the  HEX 

in  which  the  unit  is  located 

PL2  -  Pointer  to  block  of  the  unit. 

PSDB  -  Pointer  to  the  SDB  block  of  the 

unit. 

PFEL  -  Pointer  to  future  event  list 

EVENT  block. 

PACQ  -  Pointer  to  ACQBUF  block.  Used 

by  CRC's  for  acquisition  devices. 

ID  -  Identification  number. 

DATABASE  -  If  BOC  or  BTRY  points  to  ADSITEDB 

block 

PABSTATUS  -  Points  to  ABSTATUS  block  if  the 

unit  is  an  airbase 

+PARCFTSTAT  -  Points  to  ARCFTSTATUS  block  if 

the  unit  is  a  flight  of  aircraft 
+PB0CSTAT  -  Points  to  BOCSTAT  block  if  the 

unit  is  a  battalion  operations 
center. 

+PBTRYSTAT  -  Points  to  BTRSTAT  block  if  the 

unit  is  an  anti-aircraft  battery 
+STATUS  -  Alternative  field  definition. 
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c)  SOB  BLOCK 
PSB 

PSEEBUF 


+PSEE 


SUBORDINATE 


ORD 

+-PRAID 

d)  SEEBUF  BLOCK 
PTRSEE 


Pointer  to  the  unit's  SB  block 
Pointer  to  SEEBUF  block  which 
is  used  by  aircraft  flight  units 
to  record  targets  seen  and  their 
perceived  damage  levels.  This 
field  definition  is  used  only 
by  flights. 

Pointer  to  CRCEES  block  which  is 
used  by  CRC  units  to  record  the 
blue  and  red  flights  it  sees. 
Also  by  the  RTC  as  a  pointer 
to  it's  assigned  target  list. 
Points  to  different  types  of 
subordinate  description  or 
target  description  blocks 
depending  upon  the  unit  type. 
Possible  unit  type  vs.  field 
use  combination  are  as  follows: 


UNIT  TYPE 
CRC 
BOC 
BTRY 


SUBORDINATE  POINTS  TO 
SUB 

SUBLIST 

FIREUNIT 


Points  to  ORDERS  block  if  the 
unit  is  a  flight. 

Points  to  the  RAIDBLOK  if  the 


unit  is  the  Red  Theater  Com¬ 
mander. 


Pointer  to  ARCFSAW  block  (first 
in  list) 


193 


NUNITS 

Number  of  ARCFSAW  blocks  in 

the  list.  Corresponds  to  num¬ 
ber  of  targets  perceived. 

ARC F SAW  BLOCK 

PNEXT 

Pointer  to  next  ARCFSAW  block 

in  the  list. 

PSB 

- 

Pointer  to  SB  block  of  target. 

ADDRESS 

' 

Pointer  to  HEX  block  in  which 

target  is  located. 

TYPE 

- 

Unit  type  code  of  target 

DAMAGE 

Perceived  damage  level  of  the 
target.  Real  variable. 

ORDERS  BLOCK 

PTRFORMS 

- 

Pointer  to  FORMATION  block 

PTRACT 

- 

Pointer  to  COMMAND  block. 

PNEXT 

- 

Pointer  to  next  command  block. 

NUMACTS 

Number  of  the  command  in  the 

1  ist. 

TMFLG 

— 

Time  flag.  If  1  at  time  is 

associated  with  the  command. 

ADDRESS 

Pointer  to  HEX  block  in  which 

the  command  is  to  be  carried 

out. 

TIME 

' 

Time  the  command  is  to  be  per¬ 
formed. 

ACTION 

- 

Command  or  action  code 

FORMATION 

BLOCK 

PFORM 

Pointer  to  first  WINGMAN  block 

in  the  list. 

NUMFLTS 

- 

Number  of  WINGMAN  blocks  in 

the  list.  Corresponds  to  num¬ 
ber  of  flights  in  the  formation. 
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*“*v*f-***-r'  „s-, 


i)  WINGMAN  BLOCK 
PNEXT 

PSB 

j)  ARCFTSTATUS  BLOCK 
PFLTDB 
PMUNITIONS  - 
PSTRTHX 

PENDHX 

PNXTHX 

PAIRBASE  - 

CNTRLMOOE  - 
PAIRTGT 

PGNDTGT 

NUMAIRCRAFT 

rLITELEG 

INTERCEPTSTATUS 

ALTUDECHNG 

PROFILENDX 

LANDING 

ORBITSTAT 

AIRCOMBAT 

BRNDATK 

FUEL 


Pointer  to  next  WINGMAN  block 
in  the  list 

Pointer  to  the  SB  block  of 
the  flight. 

Pointer  to  FLTDB  block 
Pointer  to  MUN  block 
Pointer  to  HEX  block  in  which 
current  move  begins 
Pointer  to  HEX  block  in  which 
current  move  ends 
Pointer  to  next  HEX  block 
Pointer  to  SB  block  of  flight's 
home  airbase. 

Pointer  to  SB  block  of  airborn 
target. 

Pointer  to  SB  block  of  ground 
target 

Number  of  aircraft  in  the  flight 


Current  fuel  level.  Real  vari¬ 
able 
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ALTITUDE 


SPEED 

DIRECTION  - 

k)  MUN  BLOCK 
PAG 

NUMAG 

PAA 

NUMOA 

l)  LOAD  BLOCK 
PNEXT 

TYPE 

AMOUNT 

PORDOB 

in)  FLTDB  BLOCK 
PNXFLDB 
NRFLITE 

PTYPLDS 

NOPYLDS 

PTYAQDB 

PTACDB 


MAXNOAC 


Altitude  in  meters.  Real  vari¬ 
able 

Speed.  Real  variable 
Direction.  Real  variable. 

Pointer  to  ground  attack  LOAD 
block 

Number  of  LOAD  blocks  in  ground 
attack  munitions  list. 

Pointer  to  air  attack  LOAD  block 
Number  of  LOAD  blocks  in  air 
attack  munitions  list. 

Pointer  to  next  LOAD  block  in 

the  list 

Munitions  class 

Amount  of  munitions  in  tons 

Pointer  to  PAYLOAD  block 

Pointer  to  next  FLTDB  block 
Unique  flight  speci fication  num¬ 
ber 

Pointer  to  payload  data  block 
payload  class  6002 
Number  of  payload  data  blocks 
Pointer  to  acquisition  data 
block  (AQDB,  Class  6007) 

Pointer  to  aircraft  specifica¬ 
tion  data  block  (ACDB,  Class 
6003) 

Maximum  number  of  aircraft  in 
f 1 ight 
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MINNOAC 

MULTAC 

PROFILE 

SPFLTC(SPACE) 
DISTSEP( SPACE) 

n)  PAYLOAD  BLOCK 
PNXTYPO 
NRPOCLS 

MAXAMT 

MINAMT 

MAXFI RERANGE 

PAYLDDB 

o)  PAYLDDBLOK  BLOCK 
NEXT 

TYPEINDEX  - 

p)  AQOB  BLOCK 
NEXT 
NRAQTYP 
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Minimum  number  of  aircraft  in 
fl ight 

Multiples  of  aircraft  required 
for  flight 

Pointer  to  profile  specifica¬ 
tion  data  block  (PROFILEDBLOK) , 
Class  6005) 

Flight  cruising  speed  in  meters/ 
second  (real) 

Flight  separation  distance  in 
meters  (real) 

Pointer  to  next  PAYLOAD  block 
Payload  type,  must  be  3  or  4 

3  =  air  to  ground 

4  =  air  to  air 

Maximum  number  of  loads  of  this 
payload 

Minimum  number  of  loads  of  this 
payload 

Future  use  by  an  enhancement 
for  maximum  fire  range  for 
engagements  greater  than  one 
hex 

Pointer  to  PAYLOAD  ID  data 
block  (PAYLDDBLOK) 

Pointer  to  next  ID  block 
Payload  ID,  unique  within  each 
payload  type 

Pointer  to  next  AQDB  block 
Unit  type 


6,  BATTALION  OPERATIONS  CENTERS  (BOC) 

a.  Data  Block  Index 
ABSITEDB 
BOCSTAT 

C2 

DIB 

DIL 

PAL 

PERLIST 

SB 

SDB 

SOURCE 

SUBLIST 

b.  Description 

The  air  defense  information  for  the  Battalion  Operations 
Center  (BOC)  in  MADEM  is  stored  in  the  Digested  Information  List  (DIL). 

The  DIL  is  integrated  with  the  subordinates  of  the  BOC  to  create  the  Threat- 
Defense  Analysis  Structure  for  each  BOC. 

The  DIL  represents  the  perceived  threat  to  the  BOC  and  is 
pointed  to  from  the  BOC's  Status  Board  (BOCSTAT).  The  list  of  subordinates 
to  the  BOC  are  pointed  to  from  the  BOC  Status  Display  Board  (SDB).  The  BOC 
links  its  available  subordinates  to  the  targets  producing  the  Threat-Defense 
Analysis  Structure,  made  up  of  Possibilities  and  Allocations  Lists  (PAL) 
blocks.  This  structure  of  PAL  blocks  is  in  the  form  of  a  sparse  matrix. 
Conceptually,  the  rows  of  the  matrix  shows  what  targets  (DIL's)  are  assoc¬ 
iated  with  each  subordinate  (SUBLIST)  so  the  subordinate  can  be  maximally 
allocated.  The  columns  are  each  target,  DIL,  and  the  subordinates  that  are 
currently  associated  with  it.  The  elaborate  linking  allows  easy  addition  or 
deletion  from  the  matrix  as  well  as  ease  of  searching  for  the  information 
needed. 

The  DIL's  are  divided  up  into  three  different  configurations: 
(1)  Active  DIL  list,  (2)  Passive  DIL  list,  (3)  Force  out  queue.  This  allows 
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the  threats,  OIL'S,  to  be  handled  in  a  systematic  way.  All  the  DIL  config¬ 
urations  are  pointed  to  from  the  BOCSTATUS. 

The  Active  OIL  (ADIL)  is  a  doubly  linked  circular  list  of 
all  the  threats  actively  being  considered  by  the  BOC.  The  DIL's  in  the  ADIL 
are  also  doubly  threaded  creating  a  list  in  sequence  of  priorities.  Each 
DIL  in  the  ADIL  is  considered  one  at  a  time  in  the  list  in  increments 
controlled  by  the  Scheduled  Digest  event.  The  Air  Oefense  Data  Base 
controls  the  maximum  number  of  DIL's  a  BOC  can  have  in  its  ADIL. 

When  a  BOC  fully  assigns  the  responsibility  of  a  threat, 

DIL,  its  subordinates,  the  DIL  is  taken  out  of  the  ADIL  and  put  into  the 
Passive  DIL  list  (PDIL).  The  POIL  is  a  doubly  linked  list  of  DIL  blocks 
with  a  pointer  to  the  head  of  the  list. 

If  a  OIL  in  the  ADIL  is  forced  out  because  the  need  to  bring 
in  a  DIL  of  a  higher  priority,  it  is  put  in  the  Force  Out  Queue  (FOQ).  The 
FOQ  is  a  double  linked  list  with  a  head  and  tail  pointer  to  the  list.  This 
is  an  overflow  list  and  the  OIL  will  eventually  be  brought  back  into  the 
ADIL  when  there  is  an  opening.  The  head  and  tail  pointers  allow  access 
from  either  end  of  the  list  to  get  the  best  DIL  out  of  the  FOQ. 

Each  OIL  has  an  associated  Digested  Information  Block  (DIB) 
with  it.  This  holds  the  current  information  that  the  BOC  has  on  the  target. 
When  the  DIL  is  in  the  Active  OIL  List  a  new  DIB  is  created  and  compared  to 
the  old  one  each  time  the  DIL  (target)  is  examined.  The  DIL's  are  also 
associated  with  the  Perceptions  List,  a  PERLIST  block  from  the  Perceptions 
List  and  a  DIL  are  linked  up.  The  information  in  the  PERLIST  is  from  the 
Perception  event  and  is  used  with  the  OIL  to  represent  the  information  on 
a  target. 

c.  Structure  Overview 

1 )  Structure  Oiaqrams  (Figure  III-27,  III-28,  III-29) 

2)  Block  Definitions 

cf  -  COMMAND/CONTROL  BLOCK.  Con¬ 

tains  unit  no. ,  type,  side  and 
C2  PTRS. 
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Figure  1 1 1  -  28 .  Digested  Information  List  Configurations 


SOURCE  SOURCE  SOURCE 


PERCEPT 


OIGEST 


Figure  III-29.  Digested  Information  List  and  Perception  List 


SB 

SCOREBOARD  BLOCK.  Contains 

HEX  address;  unit  ID,  PTR  to 

BOCSTAT 

SOB 

STATUS  DISPLAY  BLOCK.  Con¬ 
tains  PTRS  to  subordinate 

list  and  perceptions  list. 

ADSITEDB 

AIR  DEFENSE  SIGHTED  DATA  BLOCK 

Contains  information  on  the 

sighted  aircraft 

BOCSTAT 

BOC  STATUS  BOARD.  Contains 

PTR  to  the  three  DIL  config¬ 
urations,  ADIL,  TRACKED,  FOQ, 

along  with  general  info  on 

the  BDC 

DIL 

DIGESTED  INFORMATION  LIST. 

Contains  information  on  a 

target  or  possible  target  on 

coverage,  engagement  windows, 

and  other  info,  contains  PTRS 
to  associated  DIL  and  percep¬ 
tion  block 

SUBLIST 

SUBORDINATE  LIST  BLOCK.  Sub¬ 
ordinate  to  the  BOC,  can  be 

associated  with  one  or  more 

targets 

PAL 

POSSIBILITIES  AND  ALLOCATIONS 

LIST.  Created  when  a  subor¬ 
dinate  and  a  target  are  assoc¬ 
iated  together 

PERLIST 

- 

PERCEPTIONS  LIST  BLOCK.  Forms 

a  list,  contains  information 
on  the  seeing  status  of  the 
target 
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r 


d. 


DIB 


DIGESTED  INFORMATION  BLOCK. 
Contains  information  on  the 


target  as  heading,  velocity, 
and  position 

Block  Specifications 
1 )  Block  Diagrams 
a)  C2 


UNITNUMBER 

PUP 

POOWN 

PSB 

PNEXT 

UNITYPE 

SLIDE 

b)  _ SB 


ADDRESS 

PC2 

PSDB 

PFEL 

PACQ 

ID 

DATABASE 

PBOCSTAT 

c)  SOB 


PSB 

PSEEBUF 

SUBORDINATE 

_ 

ORD 

d)  SUBLIST 


BTRYSB 

PNEXT 

AUTO 

NUMFU 

RAMMQ 

LOAD 

POAQUE 

NOUSE 

PPAL 

ADORESS 

e)  BOCSTAT 


AUTOFLG 

READY 

PSOIG 

PSDELY 

PADIL 

NUMADIL 

PHFOQ 

PTFQQ 

PHND I L 

PTNDIL 

HPRIOR 

TPRIOR 

PPOIL 

NUMROY 

PHADAQ 

PTDAQ 
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PUP 

PDOWN 

PPERCL 

PDIB 

L  DC 

PRIORITY 

PRIUP 

PRIDN 

DCOV 

SHORT 

POELAY 

PENGEV 

PPAL 

PSUB 

PAL 

PUPT 

PDOWNT 

PUPB 

PDOWNB 

START  (SPACE) 

END  (SPACE) 

COVER 

POIL 

PEVENT 

PSUB 

ADSITED8 

PNEXT 

ADTYPE 

M0DVAL1 


MAXNUMDIGEST 


MAXTIMEDIGEST  MINTIMEDIGEST 


LOSTTIME  (SPACE) 


LASTCHANGE  (SPACE 


ENGAGEWINDOW( SPACE 


M0DVAL2  (SPACE 


MOOVAL3  (SPACE) 


MISSILERANGE  (SPACE) 


MAXASSIGN 


M0DVAL4 


MAXTRACKRANGE  (SPACE) 


LOCKQNTIME  (SPACE) 
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PNEXT 


PSB 

UNITTYPE 

SIDE 

b)  SB  Block 
ADDRESS 

PC2 

PSDB 

PFEL 

PACQ 

ID 

DATABASE 

PBOCSTAT 


c)  SDB  Block 
PSB 

PSEEBUF 


Pointer  to  the  C2  block  of  the 
unit's  sibling. 

Pointer  to  the  SB  block  of  the 
unit. 

The  unit's  type  code  (see  sub¬ 
section  f). 

Unit  affiliation. 

1  =  Blue  (NATO) 

2  =  Red  (Pact) 

Pointer  to  HEX  block  of  the  hex 
in  which  the  unit  is  located. 
Pointer  to  C2  block  of  the  unit. 
Pointer  to  the  SDB  block  of  the 
unit. 

Pointer  to  future  event  list 
EVENT  block. 

Pointer  to  ACQBUF  block.  Used 
by  CRC's  for  acquisition  devices. 
Identification  number. 

If  BOC  or  BTRY  points  to  ADSITEDB 
block. 

Points  to  BOCSTAT  block  if  the 
unit  is  a  Battalion  Operations 
Center. 

Pointer  to  the  unit's  SB  block. 
Pointer  to  SEEBUF  block  which 
is  used  by  aircraft  flight  units 
to  record  targets  seen  and 
their  percieved  damage  levels. 
This  field  definition  is  used 
only  by  flights. 
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SUBORDINATE 

ORO 

d)  SUBLIST 
BTRVSB 

PNEXT 

AUTO 

NUMFU 

RAMMO 

LOAD 

PDAQUE 

NOUSE 

PPAL 

ADDRESS 

e)  BOCSTAT 
AUTO F LG 
READY 
PSDIG 


PSDELY 

PADIL 


NUMADIL 

PHFOQ 


Points  to  SUBLIST  block  which 
is  a  list  of  subordinates. 
Points  to  ORDERS  block  if  this 
unit  is  a  flight. 

Pointer  to  the  SB  block  of  the 
BOC. 

Pointer  to  the  SuBLIST  block  of 
the  subordinate's  sibling. 


Pointer  to  the  OAQUE  block. 

Pointer  to  the  possibilities 
and  allocations  list  block. 
Pointer  to  the  HEX  block. 


Pointer  to  the  EVENT  block  which 
is  the  next  scheduled  digest 
event. 

Pointer  to  the  EVENT  block. 
Pointer  to  the  OIL  block  which 
is  the  next  threat  (DIL)  to 
look  at  in  the  active  DIL  list. 
Number  of  DILS  in  the  active  DIL 
list. 

Pointer  to  the  OIL  block  which 
is  the  head  of  the  Force  Out 
Queue. 
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PTFOQ 


Pointer  to  the  DIL  block  which 
is  the  tail  of  the  Force  Out 
Queue. 

PHNDIL  -  Pointer  to  the  PERLIST  block. 

This  pointer  is  not  actively 
used  in  MADEM  at  present. 

PTNOIL  -  Pointer  to  the  PERLIST  block. 

This  pointer  is  not  actively 
used  in  MADEM  at  present. 

HPRIOR  -  Pointer  to  the  DIL  block  which 

is  the  head  of  the  priority 
chain  within  the  active  DIL 
1  i  st. 

TPRIOR  -  Pointer  to  the  DIL  block  which 

is  the  tail  of  the  priority 
chain  within  the  active  DIL 
1  ist. 

PPDIL  -  Pointer  to  the  DIJL  block  which 

is  the  head  of  the  passive  DIL 
1  i  st. 

NUMROY 

PHDAQ 

PTDAQ 
f)  DR 

PUP  -  Pointer  to  the  DIL  block  which 

is  the  pointer  up  in  DIL  chain. 

PDOWN  -  Pointer  to  the  DIL  block  which 

is  the  pointer  next  in  DIL  chain. 

PPERCL  -  Pointer  to  the  PERLIST  block 

which  is  the  pointer  to  the 
perceptions  list. 
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POIB 


LOC 


PRIORITY 

PRIUP 


PDOWN 


DCOV 

SHORT 


PDELAY 


PENGEV 

PPAL 


PSUB 


Pointer  to  the  DIB  block  which 
is  the  digested  information  block. 
It  holds  the  information  about 
the  flight’s  track. 

The  code  to  tell  which  DIL  con¬ 
figuration  this  OIL  is  located. 
Code:  0  -  Active  Dil  List 

1  -  Force  Out  Queue 

2  -  Passive  Dil  List 
Priority  of 

Pointer  to  the  DIL  block  which 
is  the  up  pointer  in  the  priority 
chain  in  the  active  DIL  list. 
Pointer  to  the  DIL  block  which 
is  the  down  pointer  in  the 
priority  chain  in  the  active 
DIL  list. 

Desired  coverage  of  this  target 
flight. 

Shortfall  from  desired  coverage, 
i.e. ,  Desi red-Al located  =  Short¬ 
fall. 

Pointer  to  the  DAQE  block  which 
points  to  the  delayed  action 
queue,  a  chain  of  delayed 
artions  regarding  this 
target. 

Pointer  to  the  EVENT  block. 

Pointer  to  the  PAL  block  which 
is  the  possibilities  and  allo¬ 
cations  list  block,  a  part  of 
the  threat-defense  analysis. 
Pointer  to  the  SUB  LIST  block. 


g)  PAL 
PUPT 
PDQWNT 
PUP6 
PDQWNB 
START 

END 

COVER 

PDIL 


PEVENT 

PSU8 


h)  ADSITEDB  Block 
PNEXT 
AOTYPE 

MODVAl  1 

MAXNUM  DIGEST  - 


MAX  TIME  DIGEST- 


MIN  TIME  DIGEST- 


Pointer  to  the  PAL  block. 

Pointer  to  the  PAL  block. 

Pointer  to  the  PAL  block. 

Pointer  to  the  PAL  block. 
Beginning  time  that  the  target 
is  active  for  this  BOC. 

Ending  time  that  the  target  is 
active  for  this  BOC. 

Amount  of  coverage  the  subor¬ 
dinate  is  giving  this  target. 
Pointer  to  the  PAL  block  which 
is  the  target  (DIL)  associated 
with  this  PAL. 

Pointer  to  the  EVENT  block. 
Pointer  to  the  SUBLIST  block 
which  is  the  subordinate  assoc¬ 
iated  with  this  PAL. 

Pointer  to  next  ADSITEDB  block. 
Unit  type  of  this  unit.  Must 
be  a  BOC  or  BTRY. 

Model  Value  -  1. 

Maximum  number  of  flights  on 
which  a  BOC  or  BTRY  can  be 
digesting  info  at  one  time. 
Maximum  time  (in  seconds) 
between  consecutive  digests 
of  info  (BOC  and  BTRY). 

Minimum  time  (in  seconds)  between 
consecutive  digests  of  info  (BOC 
and  BTRY). 
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LOST  TIME 


LAST  CHANCE 


ENGAGE  WINDOW  - 


MOOVAL  2 
MOOVAL  3 
COVONONE 


ONE 

COVONFEW 

FEW 

COVONMANY 

MANY 

TIMEFLIGHT 


MISSILE  RANGE  - 


Time  (in  seconds)  after  which  a 
track  not  seen  is  assumed  perma¬ 
nently  lost  (BOC  and  BTRY). 

Time  (in  seconds)  considered 
short  for  a  subordinate  to 
respond  to  a  target.  (Time  from 
now  until  his  last  chance  to 
shoot.)  BOC  only,  for  BTRY  =  0. 
Minimum  length  of  subordinates 
engagement  window  for  a  signifi¬ 
cant  engagement  opportunity  in 
seconds  (BOC  and  8TRY). 

Model  Value  =  0 
Model  Value  =  0 
Desired  number  of  fire  units 
coverage  for  one  aircraft  (BOC 
and  BTRY). 

Model  Value  =  1 
Desired  number  of  fire  units 
coverage  for  few  aircraft  (BOC 
and  BTRY). 

Model  Value  =  5,  number  of 
aircraft  considered  "few." 
Desired  number  of  fire  units 
coverage  for  many  aircraft  (BOC 
and  BTRY). 

Model  Value  =  1000000. 

Maximum  time  (in  seconds)  of 
flight  for  missile  (BOC  and 
BTRY). 

Maximum  range  for  missiles  in 
meters  (BOC  and  BTRY). 
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MAXASSIGN 


Maximum  number  of  targets  per 
ready  fire  unit  to  be  assigned 
at  one  time.  BOC  only,  for 
BTRY  =  0. 

MOOVAL  4  -  Model  Value;  for  BOC  =  8, 

BTRY  =11. 

MOOVAL  5  -  Model  Value  =  0 

MAX  TRACK  RANGE-  Maximum  tracking  range  in  meters 

BTRY  only,  for  BOC  =  0. 

LOCK  ON  TIME  -  Assumed  time  (in  seconds)  for 

BTRY  achieve  lockon.  BTRY  only, 
for  BOC  =  0. 

MOOVAL  6  -  Model  Value  =  0. 

MOOVAL  7  -  Model  Value  =  0. 

CONVLOAD  -  Number  of  conventional  missiles. 

SNUKELOAD  -  Number  of  small  nukes. 

LNUKELOAD  -  Number  of  large  nukes. 

RESUPPLYCV  -  Number  of  missiles  per  resupply 

of  ammo.  BTRY  only,  for  BOC  =  0 

CVRESUPPLYFREQ  -  Time  (in  seconds)  between  resup¬ 
ply  of  conventional  ammo.  BTRY 
only,  for  BOC  =  0. 

RESUPPLYSN  -  Number  of  missiles  per  resupply 

of  small  nukes.  BTRY  only, 

BOC  =  0. 

SNRESUPPLYFREQ  -  Time  (in  seconds)  between  resup¬ 
ply  of  small  nukes.  BTRY  only, 
BOC  =  0. 

RESUPPLYLN  -  Number  of  missiles  per  resupply 

of  large  nukes.  (BTRY  only, 

BOC  =  0). 
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LNRESUPPLYFREQ  -  Time  (in  seconds)  between  resup¬ 
ply  of  large  nukes.  BTRY  only, 

BOC  =  0. 

i)  DIB 

TIME  -  Side  of  target  (DIL). 

NUMAL 

LOST  -  Code  when  target  is  lost. 

POSITION  -  Positon  of  target. 

HEADING  -  Heading  of  target  (DIL). 

VELOCITY  -  Velocity  of  target. 

ALTITUOE  -  Altitude  of  target. 

j)  PERLIST 

PUP  -  Pointer  to  the  PERLIST  block 

which  is  an  up  pointer  in  the 
perceptions  list. 

PDOWN  -  Pointer  to  the  PERLIST  block 

which  is  a  next  pointer  in  the 
perceptions  list. 

PSB  -  Pointer  to  the  BOC's  scoreboard. 

PDIL  -  Pointer  to  the  DIL  block  which 

is  associated  with  it. 

SEEN  -  Code  to  show  seeing  status  of 

the  target. 

0  -  Can  not  see  and  has  not  been 
assigned. 

1  -  Early  warning,  has  been  assigned 

by  superior. 

2  -  Can  see  target 

PSS  -  Pointer  to  the  SOURCE  block 

which  is  a  list  of  subordinates 
that  can  see  the  target. 

PUPCHN 

PDNCHN 
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TIME 


Time  that  the  target  was  last 
seen. 

k)  SOURCE 

PSB  -  Pointer  to  the  SCOREBOARD  block 

which  is  the  scoreboard  of  the 
subordinate  that  can  see  the 
target. 

PNEXT  -  Pointer  to  the  SOURCE  block 

which  is  the  next  subordinate 
in  the  list  that  can  see  the 
target. 

e.  Linkages  to  Other  Data  Structures 

The  BOC  structures  are  linked  to  the  command  and  control  tree 
by  the  C2  block  of  the  BOC. 

f.  Notes 
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7.  SAM  BATTERY  (BTRY) 


a.  Data  Block  Index 
ABSITEDB 
ALLOCATE 
BTRYDIL 
BTRYSTAT 

C2 

DIB 

FIREUNT 

PATENGAGE 

PERLIST 

SB 

SDB 

b.  Description 

The  air  defense  information  for  the  SAM  Battery  (BTRf)  in 
MADEM  is  stored  in  the  Battery  Digested  Information  List  (BTRYDIL).  The 
fireunits  of  a  Battery  are  allocated  to  the  BTRYDILS  to  create  the  Threat- 
Defense  Allocation  Structure  for  each  Battery. 

The  BTRYDIL  represents  the  perceived  threat  to  the  Battery 
and  is  pointed  to  from  the  Battery's  Status  Board  (BTRYSTAT).  The  list  of 
fireunits  of  the  Battery  are  pointed  to  from  the  Battery  Status  Display 
Board  (SDB).  The  fireunits  are  the  Battery's  subordinates  and  the  number 
of  fireunits  are  limited  depending  on  the  type  of  Battery  it  is.  A  Hawk 
battery  can  have  at  most  two  fireunits  where  a  Here  battery  can  have  only 
one.  When  a  fireunit  is  allocated  to  a  threat,  BTRYDIL,  an  ALLOCATE  block 
is  created  to  link  the  two  together.  Note  that  at  most  there  can  only  be 
one  allocation  block  for  any  one  fireunit,  but  a  threat,  BTRDIL,  could 
have  multiple  allocation  blocks.  This  does  not  hold  for  the  last  Battery 
type,  the  PATRIOT.  A  PATRIOT  does  not  have  any  fireunits  as  subordinates, 
it  has  a  known  engagement  capacity.  The  number  of  engagements  can  be 
allocated  to  one  or  multiple  threats,  BTRYDILS.  When  a  PATRIOT  engagement 
is  allocated  to  a  threat  a  PATENGAGE  block  is  created. 
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The  BTRYDILS  are  devided  up  into  three  different  DIL 
configurations;  (1)  Active  OIL  list,  (2)  TRACKED  DIL  list,  (3)  Force  out 
queue.  This  allows  the  threats,  OILS,  to  be  handled  in  a  systematic  way. 

All  the  DIL  configurations  are  pointed  to  from  the  BTRYSTAT. 

The  Active  DIL  (AOIL)  is  a  doublyl inked  circular  list  of 
all  the  threats  actively  being  considered  by  the  Battery.  The  OIL's  in 
the  ADIL  are  considered  one  at  a  time  in  the  list,  in  increments  controlled 
by  the  Scheduled  Digest  event.  The  Air  Defense  Data  Base  controls  the 
maximum  number  of  DIL's  a  Battery  can  have  in  it's  ADIL. 

When  a  Battery  fully  assigns  the  responsibility  of  a  threat 
DIL  to  it's  subordinates,  the  DIL  is  taken  out  of  the  ADIL  and  put  into 
the  TRACKED  DIL  list.  The  Tracked  List  is  a  doubly  linked  list  of  DIL 
blocks  with  a  pointer  to  the  head  of  the  list. 

If  a  DIL  in  the  ADIL  is  forced  out  becuase  the  need  to 
bring  in  a  DIL  of  a  higher  priority,  it  is  put  in  the  Force  Out  Queue  (FOQ). 
The  FOQ  is  a  doubly  linked  list  with  a  head  and  tail  pointer  to  the  list. 

This  is  an  overflow  list  and  the  DIL  will  eventually  be  brought  back  into 
the  ADIL  when  there  is  an  opening.  The  head  and  tail  pointers  allow 
access  from  either  end  of  the  list  to  get  the  best  DIL  out  of  the  FOQ. 

Each  DIL  has  an  associated  Digested  Information  Block  (DIB) 
with  it.  This  holds  the  current  information  that  the  BOC  has  on  the 
target.  When  the  DIL  is  i..  the  Active  DIL  List  a  new  DIB  is  created  and 
compared  to  the  old  one  each  time  the  DIL  target  is  examined.  The  DIL's 
are  also  associated  with  the  Perceptions  List,  a  PERLIST  block  from  the 
Perceptions  List  and  a  OIL  are  linked  up.  The  information  in  the  PERLIST 
is  from  the  Perception  event  and  is  used  with  the  DIL  to  represent  the 
information  on  a  target. 

c.  Structure  Overview 

1 .  Structure  Diagram  (Figure  III-30,  III-31,  III-32,  III-33) 
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Figure  1 1 1 - 30 .  SAM  Battery  Structure  Diagram  (HAWK  and  HERC) 
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Figure  1 11-31.  SAM  Battery  Structure  Diagram  (PATRIOT) 
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Figure  HI-32.  BTRYDIL  Configurations 
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Figure  1 11-33.  Battery  BTRYDIL  Perception  List  Association 


b) 

c) 

d) 


FIREUNIT 


AMMO 

PNEXT 

ROIL 

STAGE 

CEASE 

PENGEV 

CAMMO 

BUSV 

N I  AMMO 

.. ■  —  ■  ■  ...1 

N2AMM0 

BTRYSTAT 
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f)  BTRYDIL 


PUP 

POOWN 

PPERC 

PDIB 

LOC 

PRIORITY 

PRIUP 

PRIDN 

DCOV 

SHORT 

POE LAY 

PENGEV 

PAL 

NUKE 

CEASE 

ASSIGN 

TRACK 

FIRE 

START  (SPACE) 

ENO  (SPACE) 

g)  ALLOCATE 


PUP 

PPDOWN 

AMMOTYPE 

PFU 

h)  ADSITEDB 


PNEXT 

ADTYPE 

MOOVAL1 * 

MAXNUMDIGEST 

MAXTIMEDIGEST 

MINTIMEDIGEST 

LOSTTIME  (SPACE) 

ENGAGEWINDOW  (SPACE) 

M00VAL2  (SPACE) 

MODVAL3  (SPACE) 

COVONONE 

ONE 

COVONFEW 

FEW 

COVONMANY 

MANY 

TIMEFLIGHT  (SPACE) 


MISSILE  RANGE  (SPACE) 
MAXASSIGN  M0DVAL4 
M0DVAL5  (SPACE) 
MAXTRACKRANGE  (SPACE) 
LOCKONTIME  (SPACE) 
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. 


M0DVAL6  (SPACE) 

M0QVAL7  (SPACE) 

CONVLOAD 

SNUKELOAD 

LNUKELOAD 

RESUPPLYCV 

CVRESUPPLYFREQ 

RESUPPLYSN 

SNRESUPPLYFREQ 

RESUPPLYLN 

LNRESUPPLYFREQ 

i )  PATENGAGE 


P'JP 

PDOWN 

PDIL 

STAGE 

CEASE 

PENGEV 

j)  DIB _ 

TIME (SPACE ) _ 

SIDE  NUMAL 

LOST  POSITION 

HEADING  (SPACE) 
VELOCITY  (SPACE) 
ALTITUDE  (SPACE) 

k)  PERLIST 


PUP 

PDOWN 

PSB 

PDIL 

SEEN 

PSS 

PULPCHN 

PDNCHN 

TIME  (SPACE) 

Field  Definitions 

a)  C2  Block 

UNITMUNBER 

Number  of  the  unit.  If  negative 
the  unit  is  a  passing  target. 

PUP 

Pointer  to  the  block  of  the 

unit's  commander. 

PDOWN 

Pointer  to  the  block  of  the 

unit's  subordinate. 
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PNEXT 

PS8 

UNITTYPE 

SIDE 

b)  SB  BLOCK 
ADDRESS 

PC2 

PSDB 

PEEL 

PACQ 

ID 

DATABASE 

PBOCSTAT 

c)  SDB  BLOCK 
PSB 

PSEEBUF 


Pointer  to  the  block  of  the 
unit's  sibling. 

Pointer  to  the  SB  block  of  the 
unit. 

The  unit’s  type  code  (see 
subsection  f) 

Unit  affiliation. 

1  =  Blue  (NATO) 

2  =  Red  (PACT) 

Pointer  to  HEX  block  of  the  HEX 
in  which  the  unit  is  located. 
Pointer  to  C  block  of  the  unit. 
Pointer  to  the  SDB  block  of 
the  unit. 

Pointer  to  future  event  list 
EVENT  block. 

Pointer  to  ACQBUF  block.  Used 
by  CRC's  for  acquisition  devices. 
Identi f ication  number 
If  BOC  or  BTRV  points  to  ADSITED8 
block. 

Points  to  80CSTAT  block  if  the 
unit  is  a  battalion  operations 
center. 

Pointer  to  the  Unit’s  SB  block. 
Pointer  to  SEEBUF  block  which  is 
used  by  aircraft  flight  units  to 
record  targets  seen  and  their 
perceived  damage  levels.  This 
field  definition  is  used  only  by 
fl ights. 
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SUBORDINATE 


ORD 

d)  AMMO 
FNEXT 


PDIL 


STAGE 

CEASE 

PENGEV 

CAMMO 

BUSY 

N I AMMO 

N 2 AMMO 

e)  BTRYSTAT 

f)  BTRYDIL 
PUP 


POOWN 


PPERC 


Points  to  F I  REUNIT  block  which 
is  a  list  of  subordinate  fire 
units. 

Points  to  ORDERS  block  if  the 
unit  is  a  flight. 

Pointer  to  the  FIREUNIT  block 
of  the  subordinate  fi reunits 
sibl i ng. 

Pointer  to  the  BTRVDIL  block 
associate  with  this  battery 
fireunit. 


Pointer  to  the  BTRYDIL  block 
which  is  the  previous  entry  in 
the  OIL  chain. 

Pointer  to  the  BTRYDIL  block 
which  is  next  entry  in  the  DIL 
chain. 

Pointer  to  the  PERLIST  block 
which  is  the  entry  in  the  per¬ 
ceptions  list  for  this  DIL. 
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POIB 


LOC 


PRIORITY 

PRIUP 


PRION 


DCOV 

SHORT 


PDELAY 


PENGEV 

PAL 


Pointer  to  the  DIB  block  which 
is  the  digested  information 
block  holding  information  about 
the  target. 

The  code  to  tell  which  OIL  con¬ 
figuration  this  DIL  is  located 
i  n 

Code:  0  -  Active  DIL  list 

1  -  Force  out  queue 

2  -  Tracked  list 
Priority  of  this  flight  as  a 
target. 

Pointer  to  the  BTRYDIL  block 
which  is  the  head  of  the  priority 
chain  within  the  active  DIL 
1  i  st. 

Pointer  to  the  BTRYDIL  block 
which  is  the  tail  of  the  priority 
chain  within  the  active  DIL  list. 
Desired  coverage  on  this  flight. 
Shortfall  from  desired  coverage: 
short  -  DCOV  (DESIRED  COVERAGE)  - 
Allocated. 

Pointer  to  the  DAQE  block  which 
i^  the  delayed  action  queue,  a 
list  of  delayed  action  for  this 
track. 

Pointer  to  the  EVENT  block 
Pointer  to  the  ALLOCATE  block 
which  is  the  allocations  list 
for  this  tracked  target,  holds 
the  list  of  all  fire  units 
allocated  to  a  target. 
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NUKE 

CEASE 

ASSIGN 

TRACK 


FIRE 

START 

END 

g)  ALLOCATE 
PUP 


PDOWN 


AMMOTYPE 

PFU 


h)  ADSITEDB  BLOCK 
PNEXT 
AOTYPE 

MODVAL  1 

MAXNUM  DIGEST  - 


MAXTIMEDIGEST  - 


Flags  target  NUKE/NoNUKE. 

'cease'  marker 

Flag:  1  -  waiting  to  track 
2  -  untrackable 
0  - 

Waiting  to  fire  flag 
Starting  window 
End  window 

Pointer  to  the  ALLOCATE  block 
which  is  the  previous  entry  in 
the  list  of  allocations. 

Pointer  to  the  ALLOCATE  block 
which  is  the  next  entry  in  the 
list  of  allocations. 

Pointer  to  the  FIREUNIT  block 
which  is  the  fire  unit  associated 
with  this  allocation. 

Pointer  to  next  ADSITEDB  block. 
Unit  type  of  this  unit,  must  be 
a  BOC  or  BTRY. 

Model  value  =  1 
Maximum  number  of  flights  on 
which  a  BOC  or  BTRY  can  be 
digesting  info  at  one  time. 
Maximum  time  (inseconds)  between 
consecutive  digests  of  into  (BOC 
&  BTRY). 
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MINTIMEDIGEST 


LOSTTIME: 


LASTCHANCE 


ENGAGE  WINDOW  - 


MODVAL  2 
MODVAL  3 
COVONONE 


ONE 

COVONFEW 

FEW 

COVONMANY 

MANY 

TIMEFLIGHT 


Minimum  time  (in  seconds)  between 
consecutive  digests  of  into  (BOC 
&  BTRY) 

Time  (in  seconds)  after  which 
a  track  not  seen  is  assumed 
permanently  lost  (BOC  &  BTRY). 
Time  (in  seconds)  considered 
short  for  subordinate  to  respond 
to  a  target. 

(time  from  now  until  his  last 
chance  to  shoot).  BOC  only, 
for  BTRY  =  0. 

Minimum  length  of  subordinates 
engagement  window  for  a  signif¬ 
icant  engagement  opportunity 
in  seconds  (BOC  &  BTRY). 

Model  Value  =  0 
Model  value  =  0 
Desired  number  of  fire  units 
coverage  for  one  aircraft 
(BOC  &  BTRY) 

Model  value  =  1 
Desired  number  of  fire  units 
coverage  for  few  aircraft 
(BOC  &  BTRY) 

Model  value  =  5,  number  of  air¬ 
craft  considered  "few". 

Desired  number  of  fi reunits 
coverage  for  many  aircraft 
(BOC  &  BTRY). 

Model  value  =  1000000. 

Maximum  time  (in  seconds)  of 
flight  for  missile  (BOC  &  BTRY) 
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MISSILE  RANGE 


Maximum  range  for  missiles  in 
meters  (BOC  &  BTRY). 

MAXASSIGN  -  Maximum  number  of  targets  per 

ready  fire  unit  to  be  assigned 
at  one  time.  BOC  only,  for 
BTRY  =  0. 

MOOVAL  4  -  Model  value;  for  BOC  =  8,  for 

BTRY  =11. 

MODVAL  5  -  Model  value  =  0. 

MAX  TRACK  RANGE-  Maximum  tracking  range  in 

meters.  BTRY  only,  for  BOC  =  0. 

LOCK  ON  TIME  -  Assume^  time  (in  seconds)  for 

BTRY  to  achieve  lockon.  BTRY 
only,  for  BOC  =  0. 

MODVAL  6  -  Model  value  =  0. 

MODVAL  7  -  Model  Value  =  0. 

C0NVL0AD  -  Number  of  conventional  missiles. 

SNUKELOAD  -  Number  of  large  nukes. 

LNUKELOAD  -  Number  oi  large  nukes. 

RESUPPLYCV  -  Number  of  missiles  per  resupply 

of  ammo.  BTRY  only,  for  BOC  =  C 

CVRESUPPLYFREQ  -  Time  (in  seconds)  between  resupply 

of  conventional  ammo.  BTRY 
only,  for  BOC  =  0. 

RESUPPLYSN  -  Number  of  missiles  per  resupply 

of  small  nukes.  BTRY  only, 

BOC  =  0. 

SNRESUPPLYFREQ  -  Time  (in  seconds)  between  re¬ 
supply  of  small  nukes.  BTRY 
only,  BOC  =  0. 

RESUPPLYLN  -  Number  of  missiles  per  resupply 

of  large  nukes.  (BTRY  only, 

BOC  =  0. 
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LNRESUPPLYFREQ  - 


i)  PATENGAGE 
PUP 


POOWN 


PD  I L 

STAGE 

CEASE 

PENGEV 

j) 

TIME 

SIDE 

NUMAL 

LOST 

POSITION 

HEADING 

VELOCITY 

ALTITUOE 

k)  PERLIST 
PUP 


PDOWN 


Time  (in  seconds)  between 
resupply  of  large  nukes. 

BTRY  only,  BOC  =  0. 

Pointer  to  the  PATENGEGE  block 
which  is  the  previous  entry 
in  the  list  of  PATENGAGES  below 
the  BTRYDIL. 

Pointer  to  the  PATENGAGE  block 
which  is  the  next  entry  in  the 
list  of  PATENGAGES  below  the 
BTRYDIL. 

Pointer  to  the  BTRYDIL  block 
associated  with  this  PATENGAGE. 


Pointer  to  the  EVENT  block. 


Side  of  target  (DIL) 

Code  when  target  is  lost. 
Position  of  target 
Heading  of  target  (DIL) 
Velocity  of  target 
Altitude  of  target 

Pointer  to  the  PERLIST  block 
which  is  an  up  pointer  in  the 
perceptions  list. 

Pointer  to  the  PERLIST  block 
which  is  a  next  pointer  in  the 
perceptions  list. 
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PSB  -  Pointer  to  the  DIL  block 

which  is  associated  with  it. 
SEEN  -  Code  to  show  seeing  status  of 

the  target 

0  -  can  not  see,  and  has  not 
been  assigned 

1  -  early  warning,  has  been 

assigned  by  superior 

2  -  can  see  target 

PSS  -  Not  used  with  battery,  only  BOC 

PUPCHN 

PDNCHN 

TIME  -  Time  that  the  target  was  last 

seen 

e.  Linkages  to  other  Data  Structures 

The  battery  structures  are  linked  to  the  command  ~nd  control 

2 

tree  by  the  C  block  of  the  battery. 

f.  Notes 
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8. 


PASSIVE  TARGETS  (PT) 


a.  Oata  Block  Index 

,  C2 

y  .  SB  (modified) 

b.  Description 

The  PASSIVE  TARGET  LIST  is  made  up  of  C2  and  associated  CB 

2 

blocks  which  are  in  a  linked  list.  This  list  is  separate  from  the  C  TREE 
and  is  used  to  represent  blue  units  which  are  non-players.  These  blue 
target  units  are  non-players  in  the  sense  that  they  merely  act  as  objectives 
for  red  attacks. 

Passive  target  units  are  characterized  by  negative  unit 
2 

numbers  in  their  C  blocks  and  a  modified  SB  block  which  has  three  rather 
than  the  usual  four  words.  The  configuration  of  the  passive  target  list  is 
shown  in  the  structure  diagram. 

c.  Structure  Overview 

1 )  Structure  Diagram  Figure  1 1 1-34 ) 
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2)  Block  Definitions 

C2  -  COMMAND/CONTROL  BLOCK.  Con¬ 

tains  list  pointers,  a  negative 
unit  number,  pointer  to  SB,  unit 
type  code  and  side. 

The  usual  four  words.  Contains 
2 

pointers  to  C  and  HEX  blocks. 


2)  Field  Definitions 


a)  C2  BLOCK 

UNITNUM8ER  -  Number  of  the  unit.  If  nega¬ 

tive  the  unit  is  a  passive  target. 

PUP  -  Pointer  to  the  C2  block  of  the 

unit's  commander. 

POOWN  -  Pointer  to  the  C2  block  of  the 

unit's  subordinate. 

PNEXT  -  Pointer  to  the  C2  block  of  the 

unit's  sibling. 

PSB  -  Pointer  to  the  SB  block  of  the 

unit. 

UNITTYPE  -  The  unit's  type  code  (see  sub¬ 

section  f) 
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SIDE 


Unit  affiliation. 

1  =  Blue  (NATO) 

2  =  Red  (PACT) 


b) 

SB  BLOCK 

ADDRESS 

Pointer  to  HEX  block  of  the 

hex  in  which  the  unit  is  located 

PC2 

2 

Pointer  to  C  block  of  the  unit. 

CUMLTIVDAMAGE  - 

Cumulative  damage  to  target. 

PACQ 

Pointer  to  ACQBUF  block.  Used 
by  CRC's  for  acquisition 
devices,  (not  used) 

ID 

Identification  number. 

Li nkaqes 

to  Other  Data  Structures 

The  PASSIVE  TARGET  LIST  is  used  exclusively  for  targeting 
by  the  red  planning  module.  Its  only  external  linkage  is  to  the  HEX  block 
in  which  the  unit  is  located, 
f.  Notes 
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H.  STORAGE  SPACE  MANAGEMENT 


1 .  Data  Block  Index 

Assorted  unnamed  unMIDASized  clocks  released  from  active  use  for 
data  storage. 

2.  Description 

Storage  space  in  the  dynamically  allocated  array  ISPACE  (131000) 
is  carried  out  using  the  routines  GIMME  and  RELEASE.  GIMME  is  used  to 
allocate  storage  blocks  in  ISPACE.  Given  the  desired  block  length  in 
words,  GIMMt  first  searches  the  Garbage  Collection  Matrix  structure  (illu¬ 
strated  in  the  structure  diagrams)  for  a  previously  allocated  but  now 
released  block  of  the  desired  length.  If  no  block  is  found  in  the  matrix, 
GIMME  accesses  NEW  SPACE  (Free  Space)  using  the  ESPTR  pointer  and  allocates 
the  desired  block.  If  there  is  no  space  available,  GIMME  stops  the  simula¬ 
tion  and  issues  a  STORAGE  SPACE  OVERFLOW  message. 

RELEASE  is  used  to  construct  the  Garbage  Collection  Matrix.  When 
a  block  is  no  longer  required,  GIMME  is  called  with  the  length  of  the  bloc', 
to  be  released.  RELEASE  then  adds  the  used  block  to  the  appropriate  list 
in  the  matrix.  The  array  ICTGIM(20)  is  used  to  count  the  number  of  released 
blocks  in  each  size  l;st.  Blocks  greater  than  or  equal  to  20  words  in  length 
are  counted  in  element  20  of  ICTGIM. 

3.  Structure  Overview 

a.  Structure  Diagrams  (See  Figures  1 1 1 - 35  and  III- 36 ) 

b.  Block  Definitions 

BLKLENTH  BLOCK  SIZE  LIST  BUFFER  BLOCK.  Contains  a  block 

length  field,  a  pointer  to  the  list  of  BLK 
blocks  of  the  specified  length  and  a  pointer 
to  the  next  BLKLENTH  block  for  the  n  next  size 
SIZE  LIST. 

BLK  RELEASED  BLOCK.  Storage  block  which  has  been 

released  for  further  use.  Contains  a  pointer 
to  the  next  BLK  block  in  its  SIZE  LIST.  All 
remaining  words  initialized  to  zero  (0). 
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ISPACE /SPACE 


4368/7 9W 


RSLPTR 


FSPTR 


*  PREVIOUSLY  ALLOCATED 
BUT  NOW  RELEASED  FOR 
REUSE. 


-  USED  SPACE 


rNEW  SPACE 
IFREE  SPACE) 


RSLPTR  -  POINTER  TO  (ADDRESS  OF)  GARBAGE  COLLECTION  MATRIX 
FSPTR  -  POINTER  TO  (ADDRESS  OF)  FREE  SPACE 


Figure  1 1 1 - 35 .  I-Space  Array  Configuration 


4368/7 9W 


Figure  1 1 1 - 36 .  Garbage  Coll 


Block  Specifications 
a.  Block  Diagrams 
1)  BLKLENGTH 
BLOCKLENGTH 
PTRBLOCK 
PTRNEXT 


PTRNEXT 


VARIABLE  LENGTH 


Field  Definitions 

1)  BLKLENGTH  Block 

BLOCKLENGTH  L 
PTRBLOCK  F 

PTRNEXT  F 

2)  BLK  Block 

PTRNEXT  F 


Length  of  BLK  blocks  on  list  (in  words). 
Pointer  to  first  BLK  block  in  the  list. 
Pointer  to  next  BLKLENGTH  block. 


Pointer  to  next  B_LK  block  in  the  size 
1  ist. 


Linkages  to  Other  Data  Structures 


All  other  data  structures  are  built  using  storage  blocks  from  either 
the  GARBAGE  MATRIX  or  FREESPACE. 

6.  Notes 
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APPENDIX  A 


EXECUTION  REQUIREMENTS 


MAOEM  ON  THE  AFWL  SYSTEM 


MADEM  uses  either  of  2  computers  at  AFWL,  the  Y  mainframe  (MFY)  or  the  X 
mainframe  (MFX).  Both  are  CDC  cyber  176  machines.  We  generally  run  on  MFY 
since  our  data  100  has  a  direct  line  there,  but  we  can  run  on  either.  It 
is  possible  to  use  a  dial  up  terminal  for  either  batch  or  interactive 
service  using  the  following  phone  numbers: 


BAUD  RATE 

MFY 

MFX 

300 

505-264-2082  (3) 

505-842-5162 

07) 

300 

— 

505-842-9980 

(10) 

300 

— 

505-264-5875 

(3) 

300 

— 

505-265-9861 

(3) 

1200 

505-264-5840 

(3) 

505-264-5705 

1200 

505-264-7812 

(3) 

-- 

4800 

505-842-6392 

(2) 

505-842-6391 

(4) 

4800 

— 

505-842-5711 

(6) 

The  number  in  parenthesis  is  the  number  of  lines  on  that  rotary. 
USING  THE  DATA  100 


The  Data  100  (JB-5C)  remote  batch  terminal  has  a  direct  line  qoing  to 
AFWL 's  MFY. 

To  Bring  up  the  Data  100: 

1.  Load  Emulator  -  Red  in  "Data  100"  cards  by  pressing  "HALT",  then 
"LOAD".  After  cards  have  been  read  press  "RUN". 

2.  Press  Xrnit  button  -  Xmit  light  on  is  for  j029  keypunch. 

3.  Wait  for  "Data  Link"  Light 

4.  Before  entering  each  command,  press  control-A. 

5.  Type  "LOGIN,  SGCBDM,  WDNA14V6,  SUP  (or  L5  for  V6) 

6.  Wait  for  "COMMAND"  message. 

7.  Type  "C" . 

To  Enter  Cards: 

1 .  Load  Cards 

2.  Press  Start 

3.  Type  "R"  When  Reader  stops. 

To  Turn  on  Line  Printer  Type  "0N,LP" 

AFWL  JOB  CARD  (1st  Card  in  Deck) 

Example:  WBOMBSM,  ST176,  T40,  J037,  P66. 

WBDMBSM  -  Can  be  any  name,  1st  5  CHARS  used  as  1st  5  CHARS  of  7 
CHAR  job  name. 
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ST1  76 

T40 


Tells  it  to  run  on  either  CYBER176  (MFY  or  MFX).  Can 
also  use  STMFX  or  STMFY  to  run  on  a  particular  machine. 

CPU  time  limit  in  OCTAL  seconds. 


1037  -  10  time  limit  in  OCTAL  seconds. 


P66 


Request  for  66  priority.  The  highest  priority  allowed 
is  dependent  on  IO+CPU  time  requested. 


P66  IO+CPU  L  100  OCTAL 
P60  IO+CPU  L  400  OCTAL 
P50  IO-CPU  L  1 ,000  OCTAL 


AFWL  ACCOUNT  CARD  (2nd  Card  in  Deck) 


Example:  Account  BSMBDM,  WDNA14V6-SGC ,  BOM,  703-821-4223. 


Account 

BSMBDM 

WDNA14V6 

SGC 

BDM 

703-821-4223 


Card  Identifier 
Means  Nothing 
Account 
Password 

Not  needed,  but  it  identifies  us 

Not  needed,  but  is  phone  number  of  user  in  case  the 
need  to  call  user. 
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MAOEM  PERM  FILES  AT  AFWL 


PERM  FILE  NAME 

COMMENTS 

MAOEM  INIT8IN 

CURRENT  INITBIN  BINARY  FILE 

MAD EM  RUNS  IN 

CURRENT  RUNBIN  BINARY  FILE 

MAOEM  HISTBIN 

CURRENT  HISTBIN  BINARY  FILE 

DAT FILE  AAA 

DATFILE  INPUT  FOR  AAA  RUN 

DATFILE  TEST  1 

DATFILE  INPUT  FOR  TEST  RUN 

UOIL  AAA 

UOIL  INPUT  FOR  AAA  RUN 

UOIL  TEST  1 

UOIL  INPUT  FOR  TEST  RUN 

MIDASTABLE  SOURCE 

SOURCE  FOR  FULL  MIOAS  TABLE 

MADEM  IDAS  TABLES 

GENERATED  MIDAS  TBLES 

ICOMPBIN 

CURRENT  BINARY  FOR  COMPARE  2ISPACES 

NIPULSTOR 

BINARY  FOR  NIPUL8T0R-DEBUG  ROUTINE 

KOMMONB I N 

BINARY  FOR  COMMON  ANALYZER 

MADEM  ONE  PLAN  1  AAA 

HOLD  FILE  LAST  MADEM  I  INITBIN  AAA  RUN 

MADEM  ONE  PLAN  2  AAA 

HOLD  FILE  FROM  CAST  MADEM  F  AAA 

INITBIN  RUN 

MADEMONE  INITBIN 

MADEM  I  INITBIN  BINARY,  (UP  TO  Ml) 

MADEM  ONE  RUNBIN 

MADEM  I  RUNBIN  BINARY,  (UP  TO  Ml) 

MADEM  ONE  HISTBIN 

MADEM  I  RUNBIN  BINARY,  (UP  TO  Ml) 

MADEM  TWORNITBIN 

MADEM  II  INITBIN  BINARY 

MADEM  TWO  RUNBIN 

MADEM  II  RUNBIN  BINARY 
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LARGE  PERM  FILES  AT  AFWL 


Any  perm  file  larger  than  35  RB's  (1960  PRU's)  will  be  routinely  purged  at 
AFWL. 

1  PRU  =  64  Words 

1  RB  =56  PRU's  =  3,584  Words 

35  RB's  =  125,440  Words 

Theoretically,  one  can  have  a  large  perm  file  saved  at  AFWL  if  it  is 
approved  by  Airman  Vickers. 

To  have  a  perm  file  over  35  RB's  saved  write  to: 

Airman  Richard  Vickers 
AFWL  LADPO 
Kirtland  AFB 
New  Mexico  87117 
(505)  264-7984 

With  the  following  information: 

1.  Justification  for  the  large  file 

2.  How  long  the  file  is  to  be  saved 

3.  The  name  of  the  file 

4.  Your  account  number 

5.  The  cycle  numbers  of  that  file  to  be  protected. 

To  give  a  better  probability  to  your  request  being  approved  send  a  cc  to: 

Pat  Smari  She  works  in  the  software  consultine  office  and  has 

AFWL/AOSD  promised  to  help  us  to  get  approval.  Kirtland  AFB 
New  Mexico  87117 
(505)  264-0831 

REGISTERING  TAPES  AT  AFWL 


AFWL  Owned  Tapes 

To  rent  an  AFWL  owned  tape  simply  call  the  AFWL  Tape  Librarian  at: 

(505)  264-0225 

Have  prepared  the  same  information  as  is  needed  when  sending  a  BDM  tape 
(see  below). 

BDM  Owned  Tapes 

If  you  don't  have  a  tape,  get  one  from  Phuoy  and  send  it  to: 

AFWL/ADPO 
Ki rtland  ABF 
New  Mexico  87117 
Attention:  EXPEDITOR 
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SEVEN  TRACK  HY  =  800  BPI 


AFWL  ACCOUNTING 
JULY  27,  1979 


HRLY  RATES 


SYSTEM 

CONNECT 

MFB 

170/HR 

$5/HR ,  7  A.M.-7  P.M. 

MFX , 

700/HR 

$10/HR,  7  A.M.-7  P.M 

BILLING  BASED  ON  SYSTEM  RECORDS 
PERMFILE  STORAGE  FREE 


BILLING  QUESTIONS 

Mr.  Elsberrid  (505)  264-0831 
(CALL  OR  WRITE  FOR  DAY  FILES) 

AFWL/ ADS 

Attention:  Consulting  Office 
Kirtland  AFB 
New  Mexico  87117 

In  Particular  call  on  accounting  program  errors  for  monthly  bills  call  Dan 
Thornburg  at  (505)  264-0208. 

HOW  TO  RUN  MADEM 


MADEM  is  currently  set  up  to  run  on  either  the  X  or  Y  mainframe  at  AFWL. 

To  run  MADEM  you  need  on  perm  files: 

1 .  UOIL  ( i nput  data) 

2.  0ATFILE  (input  data) 

3.  INITBIN  (pre-processor  binary  file) 

4.  RUNBIN  (main  binary  file) 

5.  HISTBIN  (post-processor  binary  file) 

MADEM  is  run  in  3  stages;  the  middle  stage  is  generally  run  in  6  to  12 

steps ,  or  volumes. 

The  3  stages  must  be  run  in  the  following  order:  INITBIN,  then  RUNBIN  once 
for  each  volume,  then  HISTBIN. 

The  complete  run  will  result  in  2  printouts  plus  one  printout  (the  event 
trace)  for  each  volume. 

See  Figure  1  for  a  run  diagram,  and  the  JCL  listings  for  examples  of  JCL 
desks  used  for  a  run. 
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INITBIN 


INITBIN  is  MADEM's  pre-processor.  It  processes  the  DATFILE  and  UOIL, 
and  then  plans  the  red  raid,  all  the  while  initializing  1  space  and  the 
common  blocks.  The  2  hold  files  save  1  space  and  the  common  blocks  for 
subsequent  volume  runs.  INITBIN  also  output's  a  history  file  for  the 
post-processor. 

The  Binary  file  INITBIN  is  stored  on  a  perm  file  under  the  name  'MADEM- 
INITBIN'  for  MADEM  III. 

INITBIN  INPUT: 

1.  DATFILE  -  Tape  8  -  Perm  File  name  is  'DATFILEAAA' 

2.  UOIL  -  Tape  7  -  Perm  File  name  is  'UOILAAA' 

3.  Input  deck  with  parameters: 

Card  1:  (Unformatted,  Mandatory) 

Parm  1  -  must  be  INTEGER  1  for  INITBIN 

Parm  2  -  INTEGER,  size  of  1  space  (max)  during  INITBIN 

Parm  3  -  Max  number  of  players  on  either  side 

Parm  4  -  Not  used  in  INITBIN,  max  CPU  time  (real) 

Card  2:  To  the  last  card: 

The  second  set  of  options  are  all  optional.  Each  of  these 
parms  must  begin  on  column  10x+l,  where  x=(07).  There  may 
be  from  1  to  8  RARMS  per  card,  with  as  many  cards  as  are 
necessary 
Parms: 

1 DEBUG=0N '  -  Turns  on  printing  or  subroutine  trace 

messages. 

'DUMP=0N'  -  Will  dump  1  space  at  end  of  run. 

DATFLE=0N'  -  Turns  on  display  of  DATFILE  DATA 

structure 

1 ST0P=0DAT 1  -  Stop  INITBIN  after  DATFILE 

' ST0P=U0I L 1  -  Stops  INITBIN  after  semant  (UOIL) 

1 ST0P=0EL '  -  Stop  INITBIN  after  DELADD,  before 

executing  plan  event. 

INITBIN  OUTPUT: 

1.  2  Hold  files  with  1  space,  common  blocks  (Tape  10,  Tape  11) 

2.  1  File  for  history  processing  (Tape  4) 

3.  Printout,  which  includes: 

1 )  Plan  of  red  raid 

2)  Datfile  structure  pointers 

3)  UOIL  ECHOS: 

•  commander-subordinate  relationships 

•  hex  number  for  each  unit,  RED  and  BLUE 

•  primary  target  line  (PTL)  values  for  each  applicable 
BLUE  unit 

•  discriptuin  of  corridor  block 

•  hex  and  l  pointers  for  each  unit,  RED  and  BLUE 
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4)  Common  block  dump 

5)  Other  data,  according  to  parameters,  which  may  include: 

•  subroutine  trace  messages 

•  1  space  dump 

•  data  structure  dumps 

Perm  Files  Names  for  INITBIN  output: 

TAPE  10  -  PLAN  1  AAA 

TAPE  11  -  PLAN  2  AAA 

TAPE  4  -  H ST PLAN  AAA 


WBDMBSM,ST176,T1 177, Iol77,P60,EC200.  MADEM  INITBIN  RUN  (AAA) 
ACCOUNT  BSMBDM,WDNA14V6-SGC,BDM, 703-821-4223.  B.  MACALEER 
COMMENT  *************************************** 

COMMENT.  *  * 

COMMENT.  *  MADEM  INITBIN  RUN:  * 

COMMENT.  *  READS  DATFILE,  UOIL  INPUT  * 

COMMENT.  *  GENERATES  ISPACE  * 

COMMENT.  *  PLANS  RED  RAID  * 

COMMENT.  *  SAVES  ISPACE  ON  HOLD  FILES  * 

COMMENT.  *  SAVES  COMMON  BLOCKS  ON  HOLD  FILES* 

COMMENT.  *  * 

COMMENT.  *  FILES:  * 

COMMENT.  *  TAPE4  -  HISTORY  FILE  * 

COMMENT.  *  TAPE6  -  PRINTED  OUTPUT  * 

COMMENT.  *  TAPE7  -  UOIL  INPUT  * 

COMMENT.  *  TAPE10  -  FIRST  HOLD  FILE  * 

COMMENT.  *  TAPE! 1  -  SECOND  HOLD  FILE  * 

COMMENT.  *  TAPE14  -  PRINTED  OUTPUT  * 

COMMENT.  *  * 

COMMENT  *************************************** 

REQUEST, TAPE4/PF. 

REQUEST .TAPE 1 0 ,  *PF . 

REQUEST, TAPE11 ,*PF. 

ATTACH,TAPE7,UOIL78A,ID=WONA14V6. 

ATTACH , TAPE8 , CDAT78A , ID=WDNA1 4V6. 

ATTACH , XB I N , MAD  EM I N I TB I N , I D=WDNA1 4V6 ,MR=1 . 
LDSET,PRESET=ZERO,MAP=SBEX. 

LOAD , XBIN. 

EXECUTE. 

DMP, 100,7200. 

REWIND, TAPE4. 

REWIND, TAPE6. 

REWIND, TAPE10. 

REWIND  JAPE11. 

REWIND, TAPE14. 

COMMENT  *************************************** 

COMMENT.  *  SAVE  HOLD  FILES,  HISTORY  FILE  * 

COMMENT  *************************************** 

C ATA  LOG , TAPE 1 0 , P  LAN  1  AAA , I D=WDNA 1 4V6 , R  P=999 . 

CATALOG, TAPE1 1 , PLAN2AAA, ID=WDNA14V6, RP=999. 

CATALOG , TAPE4 , HSTPLANAAA , ID=WDNA 14V6 , RP=999. 

COMMENT. 

C0PYBF.TAPE14, OUTPUT. 

C0PEBF.TAPE6, OUTPUT. 

AUDIT. ID=WDNA14V6. 

COMMENT  *************************************** 

COMMENT.  *  IF  WE  BOMBED,  GET  OUTPUT  ANYWAY  * 

COMMENT  *************************************** 

EXIT. 
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DMP, 100,7200. 

REWIND  JAPE14. 

C0PYBF,TAPE1 4, OUTPUT. 

REWIN0.TAPE6. 

C0PYBF.TAPE6, OUTPUT. 

COMMENT. 

AUD IT , ID=WDNA1 4V6 . 

rOMMENT  *************************************** 
COMMENT.  *  * 

COMMENT.  *  FIRST  INPUT  CARD  IS  MANDATORY  AND  * 

COMMENT.  *  HOLDS  4  PARAMETERS:  * 

COMMENT.  *  1.  IOP  -  MUST  BE  1  FOR  INITBIN  * 

COMMENT.  *  2.  MSPCE  -  SIZE  OF  ISPACE  * 

COMMENT.  *  3.  MAX  NO.  PLAYERS  ON  ONE  SIDE  * 

COMMENT.  *  4.  MAX  CPU  TIME  OF  THIS  RUN  * 

COMMENT.  *  * 

COMMENT.  *  THE  SECOND  INPUT  CARDS  ARE  OPTIONAL  * 

COMMENT.  *  AND  CAN  HOLD  THESE  PARMETERS:  * 

COMMENT.  *  DEBUT=ON  -  SUBROUTINE  TRACE  * 
COMMENT.  *  MESSAGES  ARE  PRINTED  * 

COMMENT.  *  DUMP=ON  -  WILL  DUMP  ISPACE  * 

COMMENT.  *  DATFLE=ON  -  WILL  DISPLAY  DATFILE  * 

COMMENT.  *  STOP=OOAT  -  STOPS  INITBIN  AFTER  * 

COMMENT.  *  PROCESSING  DATFILE, BEFORE  UOIL  * 
COMMENT.  *  STOP=UOIL  -  STOPS  AFTER  UOIL  * 

COMMENT.  *  STOP=OEL  -  STOPS  AFTER  DELADD  * 

COMMENT.  *  * 

COMMENT  *************************************** 

&  EOR 

1,50000,600,90. 

DEBUG=ON 
DUMP=ON 
DATFLE=ON 
STOP=ODAT 
#  EOI 
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RUNBIN 


A  full  production  run  is  generally  accomplished  in  volumes,  but  may  be 
done  in  one  run  if  desired.  The  length  of  a  volume  is  controlled  by  the 
fourth  input  parameter,  which  tells  MADEM  how  much  CPU  time  to  use  before 
stopping.  Using  90  seconds,  most  MADEM  runs  take  six  to  twelve  volumes. 
The  hold  files  between  each  volume  are  saved  so  that  the  user  can  rerun  any 
given  volume.  This  is  done  by  changing  the  'ATTACK'  and  ’CATALOG'  cards 
(in  the  JCL  deck)  after  each  volume  run.  The  hold  files  are  numbered 
within  the  Perm  File  name  to  identify  the  volume  that  created  them.  For 
example,  files  AAAV10,  AAAV11,  AAAV12,  and  AAAV13  are  hold  files  created  by 
volume  1.  The  'AAA1  stands  for  run  type  AAA.  There  are  currently  input 
files  on  cards  for  5  runs,  called  Runs  AAA,  BBB,  CCC,  DDD,  and  EEE. 

Perm  File  Name  for  RUNBIN:  'MADEMRUNBIN' 

RUNBIN  INPUT: 

1.  4  Hold  files  -  TAPE15,  TAPE16,  TAPE17,  TAPE18. 

(For  a  Volume  1  Run  use  only  TAPE15  and  TAPE16). 

2.  Input  deck  with  parameters: 

Card  1 : 

PARM  1  -  Must  be  INTEGER  '2'  for  RUNBIN 

PARM  2  -  INTEGER,  MAX  size  of  ISPACE 

PARM  3  -  INTEGER,  MAX  number  of  players  on  either  side. 

PARM  4  -  Real,  MAX  CPU  time  of  volume  (in  seconds) 

Card  2  to  the  last  card: 

Same  as  INITBIN ,  but  only  DUMP=0N  and  DEBUG=0N  are  effective 
parameters. 

RUNBIN  OUTPUT: 

1.  4  Hold  files  -  TAPE10,  TAPE11,  TAPE12,  TAPE13 

2.  TAPE4  -  for  the  post  processor 

3.  Event  trace  listing  (printed) 

4.  Common  block  dump  (printed) 

5.  DEBUG  messages  (if  chosen) 

6.  ISPACE  'DUMP'  (if  chosen) 
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W8DMBSM, ST1 76, T 177,101 77 ,P60,EC400.  MADEM  PRODUCTION  RUN  (AAA) 

ACCOUNT  BSMBDM.WDNA14V6-SGC, BOM, 703-821-4223.  B. MACALEER 

COMMENT  *************************************** 


COMMENT. 

* 

* 

COMMENT. 

* 

MADEM  PRODUCTION  RUN 

* 

COMMENT. 

* 

* 

COMMENT. 

* 

FILES: 

* 

COMMENT. 

* 

TAPE4 

-  HISTORY  FILE 

* 

COMMENT. 

* 

TAPE6 

-  PRINTED  OUTPUT 

* 

COMMENT. 

* 

TAPE 10 

-  FIRST  HOLD  FILE 

* 

COMMENT. 

* 

TAPE! 1 

-  SECOND  HOLD  FILE 

* 

COMMENT. 

* 

TAPE12 

-  THIRD  HOLD  FILE 

* 

COMMENT. 

* 

TAPE  13 

-  FOURTH  HOLD  FILE 

* 

COMMENT. 

* 

TAPE14 

-  PRINTED  OUTPUT 

* 

COMMENT. 

* 

* 

COMMENT  *************************************** 
REQUEST, TAPE4*PF. 

REQUEST, TAPE 10,*PF. 

REQUEST, TAPE11 ,*PF. 

REQUEST, TAPE12,*PF. 

REQUEST, TAPE13,*PF. 

COMMENT. 

ATTACK, BIN, MADEMRUNBIN,ID=WDNA14V6,MR=1. 

LDSET, PRESET=ZERO. 

LOAD, BIN. 

EXECUTE,, PL=20000. 

REWIND, TAPE4. 

REWINO ,TAPE6. 

REWIND, TAPE10. 

REWIND ,TAPE1 1 . 

REWIND, TAPE12. 

REWIND, TAPE1 3. 

REWIND, TAPE14. 

COMMENT  *************************************** 
COMMENT.  *SAVE  ISPACE,  COMMONS  * 

COMMENT.  *SAVE  TAPE4  FOR  HISTORY  PROCESSING  * 
COMMENT  *************************************** 
CATALOG , TAPE  1 0 , AAAV 10,1 D=WDNA1 4V6 , RP=999 . 
CATALOG, TAPE11 ,AAAV11 , ID=WDNA1 4V6 , RP=999. 

CATALOG , TAPE  1 2 , AAAV 12,1 D=WDNA 1 4V6 , RP=999 . 

CATALOG , TAPE  1 3 , AAA VI 3 , 1 D=WDNA 1 4V6 , RP=999 . 
CATALOG, TAPE4, HSIAAAV1 ,ID=WDNA14V6,RP=999. 
COMMENT. 

DMP, 100, 7200. 

COMMENT  *************************************** 
COMMENT.  *TAPE14  USUALLY  NULL  * 

mMMFNT  *************************************** 

C0PYBF,TAPE14, OUTPUT. 

COMMENT. 
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COMMENT  *************************************** 
COMMENT.  *TAPE6  HAS  EVENTS,  DUMPS  (IF  ANY)  * 
rflMMCNT  *************************************** 

C0PY8F , TAPE6 , OUTPUT. 

COMMENT. 

AUDIT, ID=WDNA14V6. 

COMMENT  *************************************** 
COMMENT.  *  IF  WE  BOMB,  PRINT  OUTPUT  ANYWAY  * 
COMMENT  *************************************** 
EXIT. 

DMP, 100,7200. 

REWIND, TAPE14. 

C0PYBF.TAPE14, OUTPUT. 

REWIND, TAPES. 

COPYBE, TAPES, OUTPUT. 

AUDIT, ID=WDNA14V6. 

COMMENT  *************************************** 
COMMENT.  *  * 

COMMENT.  *  FIRST  INPUT  CARD  IS  MANDATORY  AND  * 
COMMENT.  *  HOLDS  4  PARAMETERS:  * 

COMMENT.  *  1.  IOP  -  MUST  BE  2  FOR  RUNBIN  * 

COMMENT.  *  2.  MSPCE  -  SIZE  OF  ISPACE  * 

COMMENT.  *  3.  MAX  NO.  PLAYERS  ON  ONE  SIDE  * 

COMMENT.  *  4.  MAC  CPU  TIME  OF  THIS  RUN  * 

COMMENT.  *  * 

COMMENT.  *  THE  SECOND  INPUT  CARDS  ARE  OPTIONAL  * 
COMMENT.  *  AND  CAN  HOLD  THESE  PARAMETERS:  * 

COMMENT.  *  DE8UG=0N  -  SUBROUTINE  TRACE  * 

COMMENT.  *  MESSAGES  ARE  PRINTED  * 

COMMENT.  *  DUMP=ON  -  WILL  DUMP  ISPACE  * 

COMMENT.  *  * 

COMMENT  *************************************** 
&  EOR 

2,131000,600,90. 

DEBUG=ON 
DUMP=ON 
#  EOT 
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CARDS  FOR  VOLUMES: 

COMMENT. 

C  OMM  ENT  *************************************** 
CINEBT,  *  VOLUME  2,  RUN  TYPE  AAA  * 

COMMENT  *************************************** 
COMMENT. 

ATTACH , TAPE  1 5 , AAAV 10,1 D=WDNA 1 4V6 . 

ATTACH , TAPE  1 6 , AAAV 11,1 D=WDNA 1 4V6 . 

ATTACH , TAP El  7 , AAAV1 2 , ID=WDNA1 4V6 . 

ATTACH , TAPE  1 8 , AAAV 1 3 , ID=WDNA 1 4V6 . 

CATALOG ,TAPE1 0 ,AAAV20 , ID=WDNA14V6 , RP=999 . 
CATALOG, TAPE! 1 ,AAAV21 , ID=WDNA14V6 , RP=999. 

CATALOG , TAPE! 2 . AAAV 2 2 , ID=WDNA1 4V6 , RP=999 . 

CATALOG , TAPE  1 3 , AAAV23 , 1 D=WNDA 1 4V6 , RP=999 . 

CATALOG , TAPE4 , HSTAAAV2 , ID=WNDA 1 4V6 , RP=999 . 
COMMENT. 

COMMENT  *************************************** 
COMMENT.  ^VOLUME  3,  RUN  TYPE  AAA  * 

COMMENT  *************************************** 
COMMENT. 

ATTACH ,TAPE1 5 ,AAAV20 , ID=WDNA14V6. 

ATTACH , TAPE  1 6 , AAAV21 , ID^WDNAl 4V6 . 

ATTACH , TAPE1 7 , AAAV22 , ID=WDNA1 4V6 . 

ATTACH , TAPE  1 8 , AAAV23 , 1 D=WDNA 1 4V6 . 

CATALOG , TAPE  1 0 , AAAV30 , 1 D=WDNA 1 4V6 , RP=999 . 

CATALOG , TAPE1 1 , AAAV31 , ID=WDNA14V6 , RP=999. 

CATALOG , TAPE  1 2 , AAAV32 , ID=WDNA1 4V6 , RP=999 . 

CATALOG , TAPE  1 3 , AAAV33 , ID=WONA 1 4V6 , RP=999 . 

CATALOG ,TAPE4 .HSTAAAV3 , ID=W0NA14V6 , RP=999. 
COMMENT. 

COMMENT  *************************************** 
COMMENT.  ^VOLUME  4,  RUN  TYPE  AAA  * 

COMMENT  *************************************** 
COMMENT. 

ATTACH , TAPE15 . AAAV30 , ID=WDNA 1 4V6 . 

ATTACH , TAPE  1 6 , AAAV31 , 1 D=WONA 1 4V6 . 

ATTACH , TAPE  1 7 , AAAV32 , 1 D=WDNA 1 4V6 . 

ATTACH , TAPE1 8 , AAAV33 , IO=WDNA 1 4V6 . 

CATALOG , TAPE  1 0 , AAAV40 , ID=WDNA 1 4V6 , RP=9  39 . 
CATALOG, TAPE! 1 ,AAAV41 , ID=WDNA1 4V6 , RP=999 . 

CATALOG , TAPE1 2 .AAAV42 , ID=WDNA14V6 ,RP=999. 

CATALOG , TAPE  1 3 , AAAV43 , ID=WDNA1 4V6 , RP=999 . 

CATALOG , TAPE4 , HSTAAAV4 , ID=WDNA1 4V6 , RP=999 . 
COMMENT. 

COMMENT  *************************************** 
COMMENT.  ^VOLUME  5, RUN  TYPE  AAA  * 

COMMENT  *************************************** 
COMMENT. 

ATTACH , TAPE  1 5 , AAAV40 , 1 D=WDNA 1 4V6 . 
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ATTACH , TAPE! 6 , AAAV41 , ID=W0NA1 4V6 . 

ATTACH , TAPE 1 7 , AAAV42 , I D=WDNA 1 4V6 . 

ATTACH , TAPE 1 8 , AAAV43 , I D=WDNA 1 4V6 . 

CATALOG , TAPEIO , AAAV50 , ID=WDNA1 4V6 , RP=999. 
CATALOG, TAPE11 ,AAAV51 , ID=WDNA14V6 , RP=999. 

CATALOG , TAPE! 2 , AAAV52 , IO=WDNAl 4V6 , RP=999 . 

CATALOG ,TAPE1 3 , AAAV53 , ID=WDNA1 4V6 , RP=999 . 

CATALOG , TAPE4 , HSTAAAV5 , ID=WONA1 4V6 , RP=999 . 
COMMENT. 

COMMENT  *************************************** 
COMMENT.  *  VOLUME  6,  RUN  TYPE  AAA  * 

COMMENT  *************************************** 
COMMENT. 

ATTACH. TAPE1 5 .AAAV50 , IO=WDNAl 4V6 
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HISTBIN 


After  all  volumes  have  been  run,  the  post  processor  can  be  run  to  summarize 
the  outcome  of  events. 

PERM  FILE  name  of  BINARY  FILE:  HISTBIN 

INPUT: 

(1)  TAPE4  -  A  concatenation  of  all  post-processor  (history)  files 
which  includes  exactly  one  file  for  each  volume  plus  one  file 
from  INITBIN 

(2)  Two  card  input  deck  of  PARMS,  as  in  JCL  example. 

OUTPUT: 

Printed  summary  of  the  MADEM  RUN. 

NOTE:  Little  is  known  about  HISTBIN  AT  THIS  TIME. 


255 


* 


WBDMBSM.ST1 76 ,T1 77,101 77 ,P60.  MADEM  HISTORY  PROCESSING 

ACCOUNT  BSM80M,WDNA14V6-SGC,BDM, 703-821-4223.  B. MACALEER 
ATTACH , LGO .MADEMHISTBIN , ID=WDNA14V6 ,MR=1 . 

ATTACH , PLAN , HSTPLANAAA , ID=W0NA1 4V6. 

ATTACH, VI ,HSTAAAV1 , ID=WDNA14V6. 

ATTACH , V2 , HSTAAAV2 , I0=W0NA1 4V6 . 

ATTACH , V3 , HSTAAAV3 , ID=WONA 1 4V6 . 

ATTACH , V4 , HSTAAAV4 , ID=WDNA 1 4V6 . 

ATTACH , V 5 , HSTAAAV5 , ID=WDNA1 4V6 . 

ATTACH , V6 , HSTAAAV6 , ID=WDNA 1 4V6 . 

ATTACH , V7 , HSTAAAV7 , ID=WDNA1 4V6 . 

ATTACH , V8 , HSTAAAV8 , I D=WONA 1 4 V6 . 

ATTACH , V 9 , HSTAAAV9 , ID=WDNA1 4V6 . 

COPYBR , PLAN , TAPE4. 

COPYBR , VI ,TAPE4. 

COPYBR,  V2.TAPE4. 

COPYBR, V3.TAPE4. 

COPYBR, V4.TAPE4. 

COPYBR, V5.TAPE4. 

COPYBR , V6 ,TAPE4. 

COPYBR, V7,TAPE4. 

COPYBR, V8,TAPE4. 

COPYBR, V9,TAPE4. 

REWIND, TAPE4. 

LDSET ,  PRESET=ZERO. 

LOAD, LGO. 

EXECUTE. 

REWIND, TAPE4. 

C0PYSBF,TAPE4, OUTPUT. 

AUDIT, ID=WDNA14V6. 

EXIT. 

AUDIT, ID=WDNA14V6. 

&  EOR 

CONVENTIONAL  1978  AAA  LEVEL  2  PK 

39000.  ,999999999.  ,999999999. ,999999999. ,999999999. 

#  EOI 
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RUNBIN 


A  full  production  run  is  generally  accomplished  in  volumes,  but  may  be 
done  in  one  run  if  desired.  The  length  of  a  volume  is  controlled  by  the 
fourth  input  parameter,  which  tells  MADEM  how  much  CPU  time  to  use  before 
stopping.  Using  90  seconds,  most  MADEM  runs  take  six  to  twelve  volumes. 
The  hold  files  between  each  volume  are  saved  so  that  the  user  can  rerun  any 
given  volume.  This  is  done  by  changing  the  'ATTACK'  and  'CATALOG'  cards 
(in  the  JCL  deck)  after  each  volume  run.  The  hold  files  are  numbered 
within  the  Perm  File  name  to  identify  the  volume  that  created  them.  For 
example,  files  AAAV10,  AAAV1 1 ,  AAAV12,  and  AAAV13  are  hold  files  created  by 
volume  1.  The  'AAA'  stands  for  run  type  AAA.  There  are  currently  input 
files  on  cards  for  5  runs,  called  Runs  AAA,  BBB,  CCC,  DDD,  and  EEE. 

Perm  File  Name  for  RUNBIN:  ’ MADEMRUNBIN ' 

RUNBIN  INPUT: 

1.  4  Hold  files  -  TAPE15,  TAPE16,  TAPE17,  TAPE18. 

(For  a  Volume  1  Run  use  only  TAPE15  and  TAPE16). 

2.  Input  deck  with  parameters: 

Card  1 : 

PARM  1  -  Must  be  INTEGER  '2'  for  RUNBIN 

PARM  2  -  INTEGER,  MAX  size  of  ISPACE 

PARM  3  -  INTEGER,  MAX  number  of  players  on  either  side. 

PARM  4  -  Real,  MAX  CPU  time  of  volume  (in  seconds) 

Card  2  to  the  last  card: 

Same  as  INITBIN,  but  only  DUMP=0N  and  DEBUG=0N  are  effective 
parameters . 


RUNBIN  OUTPUT: 

1.  4  Hold  files  -  TAPE10,  TAPE11,  TAPE 1 2 ,  TAPE T 3 

2.  TAPE4  -  for  the  post  processor 

3.  Event  trace  listing  (printed) 

4.  Common  block  dump  (printed) 

5.  DEBUG  messages  (if  chosen) 

6.  ISPACE  'DUMP'  (if  chosen) 
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WBDMBSM , ST1 76 ,T1 77 , 10177, P60.EC400.  MADEM  PRODUCTION  RUN  (AAA) 
ACCOUNT  BSMBDM.WDNA14V6-SGC, BOM, 703-821-4223.  B. MACALEER 

AUDIT, ID=WDNA14V6. 

COMMENT. 

COMMENT  *************************************** 

COMMENT.  *  PURGE  INITBIN'S  OUTPUT  FILES  * 

COMMENT  *************************************** 

COMMENT. 

PURGE , PLAN 1 , P  LAN 1  AAA , I D=WDNA 1 4V6 , LC= 1 . 

PURGE , PLAN2 , PLAN2AAA , ID=WDNA1 4V6 , LC=1 . 

PURGE , HSTPLANAAA , I D=WDNA 1 4V6 , LC= 1 . 

COMMENT  *************************************** 

COMMENT.  *PURGE  VOLUME  1  OUTPUT  FILES  * 

COMMENT  *************************************** 

PURGE , AAAV1 0 , ID=WDNA1 4V6 , LC=1 . 

PURGE, AAAV11 ,ID=WDNA14V6,LC=1 . 

PURGE , AAAV1 2 , ID=WDNA1 4V6 , LC=1 . 

PURGE ,AAAV1 3 , ID=WDNA14V6 , LC=1 . 

PURGE, HSTV1 .HSTAAAVl , ID=WDNA14V6 , LC^l . 

COMMENT  *************************************** 

COMMENT.  *PURGE  VOLUME  2  OUTPUT  FILES  * 

comment  *************************************** 

PURGE , AAAV20 , ID=WDNA1 4V6 , LC=1 . 

PURGE, AAAV21 , ID=WDNA14V6 , LC=1 . 

PURGE, AAAV22,ID=WDNA14V6,LC=1 . 

PURGE , AAAV23 , ID=WDNA14V6 , LC=1 . 

PURGE , HSTV2 , HSTAAAV2 , I D=WDNA14V6 , LC=1 . 

COMMENT  *************************************** 

COMMENT.  *PURGE  VOLUME  3  OUTPUT  FILES  * 

COMMENT  *************************************** 

PURGE , AAAV30 , ID=WDNA 1 4V6 , LC=1 
PURGE, AAAV31 ,ID=WDNA14V6,LC=1 . 

PURGE ,AAAV32 , ID=WDNA14V6 , LC=1 . 

PURGE , AAAV33 , ID=WDNA14V6 , LC=1 . 

PURGE , HSTV3 , HSTAAAV3 , ID=WONA 1 4V6 , LC= 1 . 

COMMENT  *************************************** 

COMMENT.  *  PURGE  VOLUME  4  OUTPUT  FILES  * 

COMMENT  *************************************** 

PURGE ,AAAV40 , ID=WDNA14V6 , LC=1 . 

PURGE, AAAV41 , ID=WDNA14V6 , LC=1 . 

PURGE ,AAAV42 , ID=WDNA1 4V6 , LC=1 . 

PURGE , AAAV43 , I D=WDNA 1 4V6 , LC= 1 . 

PURGE , HSTV4 , HSTAAAV4 , ID=WDNA1 4V6 , LC=1 . 

COMMENT.  *************************************** 

COMMENT.  *  PURGE  VOLUME  5  OUTPUT  FILES  * 

COMMENT  *  ************************************* 

PURGE .AAAV50 , ID=WDNA1 4V6 , LC=1 . 

PURGE, AAAV51 ,ID=WDNA14V6,LC=1 . 

PURGE, AAAV52, ID=WDNA1 4V6, LC= 1 . 
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PURGE , AAAV53 , ID=WDNA14V6 ,LC=1. 

PURGE , HSTV5 , HSTAAAV5 , ID=WDNA 1 4V6 , LC=1 . 

COMMENT  *************************************** 
COMMENT.  *  PURGE  VOLUME  6  OUTPUT  FILES  * 

PURGE , AAAV60 , ID=WDNA 1 4V6 , LC=1 . 

PURGE, AAAV61 ,ID=WDNA14V6,LC=1. 

PURGE ,AAAV62 , ID=W0NA14V6 , LC=1 . 

PURGE , AAAV63 , IO=WONA14V6 , LC=1 . 

PURGE , HASTV6 .HSTAAAV6 , ID=WONA1 4V6 , LC=1 / 

AUDIT , IQ=WDNA14V6 . 

&  EOR 

#  EOI 
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The  MIDAS  BIN  code  is  called  "MIDAS'  on  account  BDMAFM  at  AFWL. 


JCL:  MIDAS,  COMPILE,  XXX. 

OPTION:  PL=nnn 
where  nnn=line  limit  of 
FTNOUT  FILE. 

Default:  nnn=5,000. 

MADEM  MIDAS  TABLES 

(1)  "4"  Data  Structures 

(2)  All  Data  Structures 

PROGRAM  LIBRARY  DECK  NAME  CHANGES 

The  following  subroutines  were  listed  in  decks  on  the  program  library  whose 
deck  name  did  not  match  the  subroutine  name.  The  deck  names  have  been 
changed  to  match  the  subroutine  names.  In  some  MADEM  I  and  MADEM  II 
listings.  However,  these  routines  are  filed  under  the  old  deck  name. 


SUBROUTINE 

OLD  DECK  NAME 

NEW  DECK  NAME 

AB2CRC 

ABMSG 

AB2CRC 

BNCONTC 

NBNCONT 

BNCONTC 

BNLALLE 

NBNLALL 

BNALALLE 

BTN2CRC 

BTNMSG 

BTN2CRC 

BYALCOV 

PROCCLU 

BYALCOV 

BYCONTC 

NBYCONT 

BYCONTC 

BYTKCHK 

NBYTKCH 

BYTKCHK 

CRC2INT 

INTASIN 

CRC2INT 

HANOZPT 

NHANDZP 

HANDZPT 

INRANGE 

NINRANG 

INRANGE 

INTASIN 

BADASIN 

INTASIN 

INT2CRC 

INTMSG 

INT2CRC 

RELOCAT 

NRELOC 

RELOCAT 

SAMPRCM 

NSAMPRC 

SAMPRCM 

TRKCHEK 

NTRKCHE 

TRKCHEK 

this  run  a  file  called  ‘COMPILE1 
(generally  the  output  from  UPDATE) 

through  MIDAS  and  puts  the  compilable 
fortran  code  into  a  file  XXX.  The 
default  for  XXX  is  FTNOUT. 


The  only  remaining  subroutines  that  do  not  occupy  a  deck  of  the  same  name 
are  the  UOIL  routines  in  decks  ULSUB2  and  U0ILSU8. 
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STRAY  SUBROUTINES 


The  following  subroutines  reside  in  the  noted  deck  on  the  program  library. 
These  routines  are  standard  UOIL  routines,  and  need  not  be  altered  for 
MAOEM.  These  routines  are  represented  on  our  master  list  by  deck  name,  and 
may  be  filed  as  such  in  the  books. 


DECK  UOILSUB 

DECK  ULSUB2 

APCEll 

ADOCHR 

APCEL2 

ERROR 

CARO 

EXTSCN 

CHRGEN 

LEXAN 

LACELL 

LOOKUP 

NXTSYM 

LRKPRS 
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APPENOIX  B 

MODULAR  INFORMATION  DATA  ACCESS  SYSTEM  (MIDAS) 
A.  INTRODUCTION 


MIDAS  consists  of  two  parts:  the  MIDAS  language  and  the  MIDAS  Trans¬ 
lator.  The  MIDAS  language  allows  one  to  write  programs  using  only  the 
logical  aspects  of  data  structures.  The  MIDAS  Translator  reads  data  struc¬ 
ture  definitions  and  programs  written  in  the  MIDAS  language,  realizes  the 
physical  implementation  of  the  logical  data  structures,  and  generates  a 
FORTRAN  program  or  subprogram  as  output. 

The  advantages  of  using  MIDAS  are  twofold.  First,  the  programmer  is 
no  longer  concerned  with  the  details  of  data  structure  impl ementati on ,  and 
is  free  to  use  natural  names  for  elements  of  the  data  structures.  Second, 
a  program  written  in  MIDAS  is  easier  to  convert  to  another  type  of  computer 
since  the  logical  definition  of  the  data  structures  do  not  change,  only  the 
physical  implementation  which  is  now  completely  mechanized. 

The  MIDAS  Translator  is  controlled  by  a  set  of  tables  which  define  the 
logical  data  structures  to  be  translated  and  their  specific  physical  imple¬ 
mentation.  Thus,  each  programming  project  will  utilize  a  different  set  of 
tables,  corresponding  to  the  data  structures  peculiar  to  that  project. 

The  MIDAS  Translator  constructs  these  tables  automatically  using 
information  supplied  by  the  user.  This  definition  information  is  expressed 
using  a  Data  Structure  Definition  Language  (DSOL)  which  defines  the  logical 
data  structures  and  their  physical  implementation  details.  This  language 
can  also  be  used  to  uniquely  specify  and  document  the  logical  design  of 
data  structures  during  the  preliminary  and  detailed  design  phases  of  a 
project. 

8.  THE  DATA  STRUCTURE  DEFINITION  LANGUAGE 


Data  structures  are  closely  related  to  sets;  therefore,  we  will  use 
concepts  and  notations  adaDted  from  set  theory  for  describing  the  logical 
aspects  of  data  structures.  A  data  structure  contains  members,  in  the 
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same  way  that  a  set  has  members  (we  are  excluding  the  null  set  in  this 
discussion  since  a  data  structure  with  no  members,  and  hence  no  informa¬ 
tion,  is  not  of  practical  value).  We  will  assign  unique  names  to  all  data 
structures.  We  may  assign  arbitrary  names  to  the  data  structure  members, 
provided  we  do  not  use  any  of  the  data  structure  names.  Thus,  for  example, 
we  can  write: 

A  =  (A1 ,  A2 ,  A3,  A4) 

B  =  (81 ,  B2 ,  B3 ,  B4 ,  85) 

C  =  (DOG) 

Here  we  have  defined  three  data  structures,  A,  B,  and  C,  with  members  as 
shown. 

We  impose  the  restriction  that  a  data  structure  member  may  not  be  a 
data  structure.  This  means  that  the  following  definition  is  illegal: 

A  =  (B,  C) 

B  =  (D,  E) 

This  restriction  is  imposed  by  the  current  capability  of  the  MIDAS  Transla¬ 
tor  and  is  expected  to  be  removed  at  a  later  date. 

We  also  note  that  the  logical  definition  of  a  data  structure  does  not 
require  the  members  to  be  ordered.  For  example,  the  following  two  defini¬ 
tions  of  data  structure  A  are  logically  equivalent: 

A  =  (B,  C) 

A  =  (C,  B) 

However,  physical  implementation  of  data  structures  using  the  MIDAS  Trans¬ 
lator  will  require  that  the  members  be  ordered.  Therefore,  we  will  assume 
that  the  members  are  ordered  for  this  reason.  The  order  is  that  in  which 
the  members  are  listed  in  the  data  structure  definition.  Since  there  is 
only  one  definition  for  each  data  structure,  there  is  no  possibility  of  a 
conflict  in  order  arising. 

A  member  may  have  an  attribute  associated  with  it.  The  only  attribute 
which  will  be  permitted  under  the  initial  DSDL  will  be  the  pointer  attri¬ 
bute.  The  pointer  attribute  specifies  that  the  member  is  a  pointer  to  a 
specified  data  strucutre.  A  member  with  the  pointer  attribute  is  denoted 
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by  the  form  A=*8,  where  A  is  the  member  name  and  B  is  the  data  structure 
which  is  pointed  to  by  A.  For  example: 

A  =  (E=*B,  F,  PTRC=*C) 

B  =  (PTRUP=*C,  81 ) 

C  =  (0,  PTRNEXT=*A) 

These  definitions  are  equivalent  to  the  following  schematic  representation: 
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Members  which  are  data  structure  pointers  always  point  to  the  data 
structure  itself,  not  to  any  members  of  the  data  structure.  This  distinc¬ 
tion  is  important  to  understand,  since  the  entire  MIDAS  system  is  based  on 
this  convention.  Thus,  in  the  above  example,  member  PTRC  of  data  structure 
A  ooints  to  data  structure  C,  but  not  to  member  D  of  data  structure  C. 

The  above  discussion  treats  only  the  logical  aspects  of  data  structure 
definition.  In  order  for  MIDAS  to  implement  a  data  structure  it  is  also 
necessary  to  specify  the  physical  properties  of  the  data  structure.  This 
is  done  for  each  member  of  the  structure. 

Each  structure  will  be  implemented  in  one  or  more  words  of  storage.  A 
member  may  occupy  an  entire  word,  or  it  may  occupy  a  bit  field  within  a 
word.  In  addition,  the  data  structure  itself  is  embedded  within  a  FORTRAN 
structure  such  as  an  array  or  COMMON  block.  A  means  must  be  provided  Tor 
specifying  all  of  these  physical  properties. 

DSDL  will  utilize  a  parenthesized  notation  to  specify  the  physical 
prooerties  of  data  structures.  The  FORTRAN  structure  which  contains  a 
logical  data  structure  will  be  denoted  as  in  the  following  example: 

A(ISPACE)  =  (B,  C,  0) 

This  indicates  that  data  structure  A  is  physically  contained  within  an 
array  named  ISPACE.  Only  onedinensi onal  arrays  may  be  used  for  FORTRAN 
structures  with  the  current  version  of  the  MIDAS  Translator. 
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Members  of  data  structures  are  stored  as  one  member  per  word,  in  the 
same  order  as  the  members  are  listed  in  the  data  strucutre  definition, 
unless  otherwise  indicated.  Thus,  in  the  above  example,  data  structure  A 
requires  three  words  of  storage  space,  one  each  for  B,  C,  and  0. 

It  may  be  desirable  to  pack  several  members  into  the  same  word,  with  a 
specific  bit  field  allocated  for  each  member  within  the  word.  All  of  the 
members  which  occupy  the  same  physical  word  are  enclosed  by  parentheses. 
For  example: 

A(ISPACE)  =  (B,  (C,  0,  E),  F) 

Here  data  structure  A  requires  three  words  of  storage,  but  members  C,  0, 
and  £  are  packed  into  the  second  word.  We  have  shown  how  two  or  more 
members  are  packed,  but  we  have  not  indicated  the  bit  fields  which  contain 
them.  Bit  field  designation  is  accomplished  with  an  integer  which  speci¬ 
fies  the  number  of  consecutive  bits  in  the  field.  This  integer  is  enclosed 
in  parentheses  and  immediately  follows  the  member  name  (if  the  member  name 
has  an  attribute,  the  bit  field  information  follows  the  attribute  informa¬ 
tion).  For  a  given  computer  word,  the  bit  fields  are  assigned  in  the  order 
that  members  are  specified,  starting  with  the  leftmost  bit  and  proceeding 
to  the  right.  It  is  not  necessary  that  the  bit  space  of  the  entire  word  be 
allocated.  For  example: 

A(ISPACE)  =  (B,  ( C ( 1 2 ) ,  0(28),  E=*P(20)),  F) 

Assuming  a  60  bit  word,  this  data  structure  definition  can  be  represented 
schematically  as: 


A  P 


The  Oata  Structure  A  is  contained  in  array  ISPACE.  Data  structure  P,  which 
is  pointed  to  by  member  E  of  A  may  or  may  not  be  in  ISPACE. 

All  data  structure  members  which  are  bit  packed  are  assumed  to  be 
accessed  (in  the  FORTRAN  sense)  in  the  array  name  specified  on  the  left 
hand  side  of  the  data  structure  definition  statement.  Normally,  this 
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"default"  array  will  be  of  integer  type,  since  it  is  unlikely  that  a  packed 
word  will  contain  floating  point  data.  On  the  other  hand,  other  members  of 
the  same  data  strucutre  which  occupy  entire  words  may  be  of  a  different 
number  type,  such  as  real,  and  therefore  require  access  using  a  different 
FORTRAN  array  name. 

The  default  array  name  can  be  overridden  for  a  particular  member  by 
following  the  member  name  with  the  array  name  required  by  that  member;  this 
member  array  name  is  enclosed  by  parentheses  and  applies  only  to  that 
specific  member.  This  feature  is  applicable  only  to  members  which  occupy 
entire  words;  all  members  which  are  bit  packed  automatically  use  the 
default  array  name.  For  example: 

A(ISPACE)  =  (B(SPACE),  (C(12),  0(28),  E=*P(20)),  F) 

C.  TABLE  GENERATION  FOR  THE  MIDAS  TRANSLATOR 


Before  the  MIDAS  Translator  can  be  used  to  translate  source  programs 
written  in  the  MIDAS  language,  it  must  be  told  how  to  interpret  logical 
data  structure  references  and  implement  them  in  FORTRAN.  This  is  done  by 
an  input  language  which  includes  statements  written  in  the  Data  Structure 
Definition  Language  along  with  other  information.  Using  this  input,  the 
MIDAS  Translator  builds  the  translation  tables  from  scratch,  or,  alter¬ 
natively,  augments  a  table  which  already  exists. 

Table  construction  or  augmentation  is  known  as  Phase  I  operation  of 
the  MIDAS  Translator.  This  phase  is  optional  in  a  given  MIDAS  run,  but 
must  have  been  done  at  least  once  before  mi  das  source  language  programs  can 
be  translated. 

Phase  1  operation  is  initiated  by  the  appearance  of  a  special  input 
card  which  has  one  of  two  forms.  If  the  translation  tables  are  being  con¬ 
structed  from  scratch  the  initial  card  has  the  form: 

/MIDAS  dialect 

Where  dialect  is  one  of  the  key  words  CDC,  IBM,  MULTICS,  or  UNIVAC. 
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Thus  the  dialect  specifies  a  particular  computer  system  for  which  the 
tables  will  be  constructed.  On  the  other  hand,  if  additional  data  struc¬ 
ture  definitions  are  being  added  to  previously  generated  tables,  MIDAS 
already  knows  which  computer  system  is  required,  and  the  initial  card  nas 
the  form: 

/MIDAS 

The  MIDAS  card  is  followed  by  information  which  defines  the  number 
type  for  all  arrays  which  are  being  introduced  for  the  fi rst  time  in  sub¬ 
sequent  data  structure  definition  statements;  if  an  array  has  previously 
been  introduced  in  an  earlier  Phase  1  run,  MIDAS  already  knows  its  number 
type  and  respecification  of  number  type  for  that  array  will  not  be  allowed. 
The  specification  of  array  type  is  needed  when  tables  are  being  built  for 
either  IEM  or  MULTICS  dialect.  For  CDC  and  UNIVAC  dialect  the  array  type 
information  is  superfluous  and  need  not  be  included. 

The  array  type  information  is  introduced  with  the  card: 

/TYPE 

This  is  followed  by  one  or  more  cards  of  array  type  specification; 
each  card  begins  with  the  keyword  REAL  or  INTEGER,  followed  by  the  names  of 
the  arrays  of  that  type,  using  comma  separators  between  array  names.  For 
example: 

/TYPE 

REAL  SPACE,  SCOREBOARD,  QUEUE 
INTEGER  ISPACE,  ISCORE 
REAL  QXR 

The  data  structure  definition  block  appears  next.  It  is  introduced  by  the 
card: 


263 


/DEFINE 


which  is  followed  by  one  or  more  cards  containing  data  structure  defini¬ 
tions,  using  the  Data  Structure  Definition  Language  described  in  the  pre¬ 
vious  section. 

Following  the  data  structure  definition  block  the  user  may  include  an 
optional  macro  definition  block.  This  block  is  introduced  by  the  card: 

/MACRO 

which  is  followed  by  one  or  more  macro  definitions.  Each  macro  definition 
is  introduced  by  a  card  containing  the  macro  name  enclosed  by  $  characters. 
This  is  then  followed  by  one  or  more  card  images  which  contain  the  actual 
macro  text.  The  macro  text  may  be  arbitrary  except  that  the  first  charac¬ 
ter  on  any  macro  text  card  can  not  be  a  $  or  /.  For  example: 

/MACRO 

SSUE5 

THIS  IS  A  MACRO 
SMARYS 
MARY  HAO 
A 

LITTLE 

MACRO 

In  this  example  two  macros,  SSUES  and  SMARYS,  are  defined. 

The  end  of  the  input  for  Phase  1  operation  is  the  card: 


/END 

Note  that  the  only  required  input  cards  for  Phase  1  operation  are 
/MIDAS  and  /E NO.  All  other  input  is  optional,  however,  at  least  one  defi¬ 
nition  block  must  be  included,  as  introduced  by  /TYPE,  /DEFINE,  or  /MACRO. 
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If  a  previously  generated  table  is  being  augmented,  only  additions  are 
permitted  to  the  table.  No  previously  defined  information  may  be  changed 
or  redefined. 

0.  THE  MIDAS  LANGUAGE 

In  order  to  illustrate  the  MIDAS  language  we  define  a  set  of  data 
structures  which  will  be  used  in  conjunction  with  an  extended  example.  The 
definitions  are  written  using  the  input  language  for  Phase  1  operation  of 
the  MIDAS  Translator: 

/MIDAS  CDC 
/DEFINE 

SB(ABC)  =  (PAT=*P ,  (TIM(30),  J0HN=*CC(1Q) ,  00N(20)),  JO£=*Q) 

CC(XYZ)  =  (TIM,  (D0N(30)t  DICK(30))) 

H(4AA)  =  ( (TTM( 20 ) ,  PAT(30)) 

P(BB)  =  (TIM) 

/MACRO 

SSUES 

INTEGER  ABC 
DATA  IDEBUG/0/ 

/END 

These  data  structures  have  the  following  schematic  representation: 


Next  we  present  a  MIDAS  subroutine  which  exhibits  all  of  the  features 
of  the  MIDAS  language: 


SUBROUTINE  POQ  (8 ,C, JIM, SILL, BOB)  1 

COMMON/ARRAYS/ ABC( 1000), XYZ9500) ,AAA(200) ,BBB(700)  2 

OECLARE  JIM=S8 ,  K  3 

DECLARE  J,  SILL  =  CC  4 

DECLARE  808  =  SB  5 

$SUE$  6 

SJ=JIM$  7 

$K=80B. PATS  8 

100  A=8*C+J*K  9 

B=$J. JOE. PATS  10 

200  $K.TIM$=3+SK.TIMS*5/$8ILL.OON$  11 

RETURN  1 2 

END  13 


This  subroutine  is  not  intended  to  represent  meaningful  computation  but 
only  to  serve  as  an  example  of  the  use  of  the  MIDAS  language.  The  lines  of 
the  subroutine  are  numbered  to  permit  easy  referencing  in  the  discussion 
which  follows. 

The  arrays  which  contain  the  data  structure  SB,  CC,  Q,  and  P  must  be 
available  within  the  subroutine  since  they  will  be  referenced  by  the 
FORTRAN  subroutine  generated  by  the  MIDAS  Translator.  This  is  accomplished 
through  the  COMMON  statement  in  line  2.  The  arrays  could  also  have  been 
established  through  the  parameter  list  or  with  DIMENSION  statements. 

The  data  structures  SB,  CC,  P,  and  Q  are  actually  prototypes  or  tem¬ 
plates.  In  practice,  there  will  probably  be  many  copies  of  a  given  type  of 
data  structure  in  use.  The  individual  copies  are  distinguished  from  each 
other  by  the  use  of  different  pointers  for  each  copy.  Thus,  we  need  a 
means  of  associating  a  particular  pointer  name  with  the  type  of  data  struc¬ 
ture  which  it  is  pointing  to.  This  is  done  with  the  OECLARE  statement. 


In  line  3  we  declare  the  FORTRAN  variable  JIM  to  be  a  pointer  to  a 
data  structure  of  type  SB.  Similarly,  in  line  5  we  declare  BOB  to  also  be 
a  pointer  to  a  data  structure  of  type  SB.  JIM  and  BOB  may  point  to  the 
same  instance  of  S8  or  to  different  instances.  In  line  4  we  declare  BILL 
to  be  a  pointer  to  a  data  structure  of  type  CC.  It  is  necessary  to  estab¬ 
lish  values  for  JIM,  BOB,  and  BILL  before  each  of  them  is  first  used  in  a 
MIDAS  data  structure  reference.  In  this  example,  these  values  are  passed 
through  the  parameter  list. 

Given  the  name  of  a  pointer  to  a  data  structure,  we  can  now  locate  and 
reference  the  value  of  any  member  within  that  data  structure.  This  is  done 
by  constructing  a  compound  name,  enclosed  in  $  symbols,  using  the  (.) 
period  symbol  to  separate  elements  of  the  compound  name.  For  example,  we 
can  reference  the  member  JOHN  in  data  structure  SB,  using  JIM  as  a  pointer 
to  SB,  by  the  notation  SJIM. JOHNS.  This  provides  us  with  the  actual  value 
of  JOHN.  Since  JOHN  is  a  pointer  to  a  data  structure  of  type  CC,  we  can 
then  refer  to  member  DICK  of  CC  by  the  notation  SJIM;JOHN;DICKS. 

It  is  useful  to  have  a  means  of  working  with  partial  compound  names  by 
establishing  intermediate  pointer  values.  This  avoids  having  to  unravel  a 
long  compound  name  each  time  the  name  is  used,  with  the  corresponding  space 
and  time  penalties  in  the  executing  program.  This  can  be  accomplished 
using  a  pointer  macro.  A  pointer  macro  establishes  a  MIDAS  name  for  a 
pointer  value  which  has  been  derived  by  traversing  a  pointer  chain  through 
the  data  structures.  Once  defined,  the  pointer  macro  can  then  be  used  in 
place  of  the  compound  name  which  it  represents. 

Examples  of  the  specification  of  pointer  macros  are  shown  in  lines  7 
and  8.  As  can  be  seen,  the  pointer  macro  definition  consists  of  a  simple 
replacement  statement  enclosed  by  S  symbols.  The  left  side  of  the  replace¬ 
ment  statement  is  an  integer  FORTRAN  variable;  the  right  side  is  a  simple 
or  compound  name  representing  a  data  structure  pointer.  On  the  right  side 
the  simple  name  or  the  first  element  of  the  compound  name  may  be  either  a 
data  structure  pointer  or  a  previously  defined  pointer  macro. 

Once  defined,  a  pointer  macro  may  not  be  redefined.  The  definition 
remains  to  the  end  of  the  program  or  subprogram.  Also,  a  pointer  macro 


must  be  defined  before  it  is  used.  This  requires  that  the  definition  card 
physically  must  precede  any  cards  which  use  the  pointer  macro  in  the  MIDAS 
source  deck,  and  that  the  pointer  macro  definition  statement  must  be 
executed  before  any  statements  which  reference  the  pointer  macro  in  the 
actual  program  execution. 

In  line  8  we  define  the  pointer  macro  K  as  representing  the  string 
BOB. PAT;  this  will  actually  generate  a  FORTRAN  variable  K  which  contains 
the  value  of  $80B.  PATS,  so  that  K  may  subsequently  be  used  in  the  normal 
FORTRAN  sense.  However,  since  K  also  represents  the  string  BOB. PAT,  we 
note  that  the  reference  SK.TIMS  is  identical  to  the  reference  $808. PAT. 
TIMS,  as  shown  in  line  11. 

Similarly,  we  are  substituting  the  MIDAS  name  J  for  JIM  (and  con¬ 
sequently  the  value  of  FORTRAN  variable  J  is  set  to  the  value  of  FORTRAN 
variable  JIM)  as  shown  in  line  7.  This  permits  us  to  write  the  MIDAS  name 
$J.J0£.PAT$  in  line  10,  which  is  equivalent  to  $JIM. JOE. PATS. 

Whenever  a  name  is  to  be  used  as  a  pointer  macro,  this  fact  must  be 
noted  in  a  DECLARE  statement.  This  is  done  by  simply  including  the  name  in 
the  list 'for  a  DECLARE  statement  such  as  is  done  in  lines  3  arid  4  for  K 
and  J,  respectively.  Individual  items  in  a  DECLARE  statement  list  are 
separated  by  commas  as  shown. 

MIDAS  also  permits  the  user  to  employ  card  macro  definitions.  A 
reference  to  a  card  macro  is  shown  in  line  6  and  consists  of  the  macro  name 
(e.g. ,  5UE)  enclosed  in  $  symbols.  The  macro  reference  must  net  start  in 
columns  1  through  6.  Whenever  a  card  macro  is  encountered,  MIDAS  will 
replace  the  macro  with  a  set  of  one  or  more  80  column  card  images  which 
correspond  to  ’  macro  name.  These  card  images  may  not  contain  any  non- 
FORTRAN  (i.e.,  •''HAS)  text,  since  the  card  images  are  not  interpreted  by 

the  MIOAS  translator.  The  END  card  must  not  be  included  within  the  macro 
card  set.  The  card  macro  may  occur  anywhere  before  the  END  card,  there  may 
be  as  many  different  card  macros  as  desired,  and  the  same  card  macro  may 
aocear  several  times. 

There  are  some  restrictions  on  ordering  of  MIDAS  information.  As  dis¬ 
cussed  earlier,  pointer  macro  definitions  must  orecede  any  use  of  that 
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pointer  macro  both  in  card  sequence  and  execution  sequence.  Also,  the 
OECLARE  statement  must  precede  the  use  of  any  item  specified  in  that 
DECLARE  statement. 

Whenever  an  ENO  card  is  encountered,  signifying  the  end  of  a  subpro¬ 
gram,  all  definitions  local  to  that  subprogram  as  expressed  on  DECLARE 
cards  and  through  pointer  macro  definition  statements  are  lost.  Other 
subprograms  may  follow  and  will  be  processed  in  sequence,  but  they  must 
establish  their  own  local  definitions. 

A  word  about  number  types:  Names  chosen  for  pointers  to  data  struc¬ 
tures  and  macro  pointers  (as  specified  in  DECLARE  statements)  will  have  an 
identical  FORTRAN  name.  Since  these  names  represent  pointers,  they  would 
be  chosen  so  that  they  start  with  letters  I  through  N.  Otherwise,  it  will 
be  necessary  to  type  them  as  INTEGER  using  a  TYPE  statement. 

E.  USING  THE  MIDAS  TRANSLATOR 

The  MIDAS  Translator  is  a  cross-translator,  i.e. ,  it  is  capaole  of 
generating  output  for  several  different  computing  systems  including  the 
system  it  operates  on.  Furthermore,  MIDAS  is  designed  to  operate  on  all  of 
the  computing  systems  for  which  it  is  capable  of  providing  translation 
output.  These  systems  are  COC  6000/7000/Cyber  series  with  FTN  FORTRAN,  IEM 
360/370  series  with  FORTRAN  Level  G  and  H,  Univac  1108  with  FORTRAN  V,  and 
Honeywell  MULTICS  with  FORTRAN. 

The  operating  details  depend  in  part  upon  the  computing  system  on 
which  the  MIDAS  Translator  is  operating.  However,  certain  aspects  of 
operation  are  common  to  all  systems  and  will  be  discussed  first. 

1 .  General  Operating  Oeatils 

MIDAS  Translator  operation  involves  two  phases.  Phase  1 
generates  the  MIDAS  translation  tables  using  the  input  language  described 
in  Section  C.  For  a  particular  programming  project  and  target  computer  a 
Phase  1  operation  must  be  executed  at  least  once.  The  tables  which  are 
generated  may  be  saved  as  files  and  used  for  immediate  or  later  translation 
of  programs  written  in  the  MIDAS  language.  Furthermore,  the  tables  may  be 
augmented  at  any  later  time  by  additional  Phase  1  operations. 
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Whenever  a  Phase  I  operation  occurs,  the  tables  which  are  gen¬ 
erated  as  output  are  called  New  MIDAS  Tables.  Whenever  the  MIDAS  Trans¬ 
lator  is  run  for  strictly  translation  purposes  or  for  augmenting  existing 
MIDAS  tables,  an  existing  set  of  tables  must  be  provided  as  input;  these 
existing  tables  are  called  Old  MIDAS  Tables.  Thus,  every  MIDAS  Translator 
run  except  the  initial  run  which  builds  the  first  set  of  tables  for  a 
particular  project  and/or  target  computer  will  require  a  set  of  Old  MIDAS 
Tables. 

The  old  and  new  tables  are  input  and  output  as  binary  files.  The 
file  names  are  dependent  upon  the  computer  system  on  which  MIDAS  is 
running.  In  addition,  there  are  three  other  files:  card  image  input, 
printed  output,  and  translated  output. 

The  card  image  input  file  contains  two  optional  blocks  of  infor¬ 
mation,  of  which  at  least  one  of  the  blocks  must  be  present.  The  first 
Dlock  is  the  date  structure  definition  using  the  language  described  in  Sec¬ 
tion  C.  The  other  block  contains  the  programs  to  be  translated,  written  in 
MIDAS  language.  Each  program  to  be  translated  must  terminate  with  a  normal 
F08TRAN  END  card,  and  as  many  programs  as  desired  may  sequentially  appear 
in  the  input.  If  both  data  structure  definitions  and  source  programs 
appear,  the  data  structure  definitions  must  come  first. 

Listed  output  from  the  MIDAS  Translator  includes  all  input 
information  and  diagnostics  in  the  event  of  error.  If  a  source  program 
contains  a  MIDAS  detectable  error,  an  error  statement  will  be  inserted  into 
the  translated  output  for  that  program  which  will  produce  a  FORTRAN  error 
when  the  program  is  compiled.  Subsequent  source  programs  will  be  trans¬ 
lated  correctly. 

The  translated  output  file  contains  C3rd  images  of  the  translated 
source  program  in  the  FORTRAN  dialect  appropriate  to  the  target  computing 
system. 

2.  CPC  Operating  Details 

The  following  file  names  are  used  by  MIDAS: 
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INPUT  Input  card  images 

OUTPUT  Listed  output 

OLDMT  Old  MIDAS  Tables 

NEWMT  New  MIDAS  Tables 

FTNOUT  Translated  source  programs 

The  program  operates  in  a  field  length  of  55Q00g  words.  MIDAS  can  be 
called  by  the  single  control  card: 

MIDAS. 

If  the  input  card  images  are  on  a  file  other  than  INPUT,  say,  file  SOURCE, 
then  the  control  card  should  read: 

MIDAS, SOURCE. 

The  MIDAS  Translator  on  COC  systems  provides  complete  translation 
capability  to  CDC,  IBM,  UNIVAC,  and  MULTICS  target  systems. 

3.  MULTICS  Operating  Qetails 

The  following  file  names  are  used  by  MIDAS: 

FILE04  Input  card  images 

FILE06  Listed  output 

FILE07  Translated  source  programs 

FILE08  Old  MIDAS  Tables 

FILE09  New  MIDAS  Tables 

The  MIDAS  Translator  on  MULTICS  provides  complete  translation 
capability  to  IBM,  UNIVAC,  and  MULTICS  target  systems.  Data  structure 
definitions  involving  bit  packed  words  are  not  permitted  for  translation  to 
CDC  target  systems . 
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4.  IBM  Operating  Details 

The  IBM  version  of  MIDAS  is  under  development  at  the  present 

time. 

5.  UNIVAC  Operating  Details 

The  UNIVAC  version  of  MIDAS  is  under  development  at  the  present 

time. 
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MEMORANDUM 


BDM/W-AFM- 2390-78 


11  May  1978 


TO:  MIDAS  Users 

FROM:  A.  F.  Malmberg,  Chief  Scientist  (5200) 

SUBJECT:  Multiple  Definition  Capability  in  MIDAS 

MIDAS  has  been  extended  to  permit  the  user  to  make  multiple  defini¬ 
tions  of  data  structures  and  data  structure  members.  These  definitions 
may  be  made  at  the  data  structure,  word,  or  byte  level.  This  feature  is 
supported  by  UPDATE  level  AM78131A  and  above  of  MIDAS. 

The  +  symbol  is  used  to  separate  the  multiple  definitions  at  a  par¬ 
ticular  level.  For  example,  two  definitions  of  the  data  structure  S  can 
be  made  as  follows: 

S(AAA)  =  (J,  K)  +  (L,  M,  N) 

Note  that  each  definition  of  the  data  structure  may  have  a  different 
number  of  words. 

Multiple  definitions  at  the  word  level  can  be  accomplished  as  shown 
in  this  example: 

S(AAA)  =  (J  +  P,  K  +  B  +  C) 

Multiple  definitions  at  the  byte  level  may  also  be  made: 

S(AAA)  =  (J,  (0(3)  +  E,  F( 10) ,  G(30)  +  H  +  W)) 

When  making  multiple  definitions  for  a  particular  byte,  the  first  defini¬ 
tion  listed  must  specify  the  byte  size  in  bits;  subsequent  definitions  of 
that  byte  must  not  specify  the  byte  size. 

Each  data  structure  definition  statement  must  contain  unique  names. 
Thus,  the  following  multiple  definition  is  not  allowed: 

S(AAA)  =  (J,  K)  +  (L,  J) 
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8DM/W-AFM-2390-78 
Page  2  of  2 
11  May  1978 


Other  than  conmon  byte  size  for  a  particular  byte,  there  are  no  restric¬ 
tions  imposed  on  the  nature  of  the  members  in  multiple  definition.  Thus, 
each  member  may  be  independently  assigned  pointer  attributes  and  alter¬ 
nate  FORTRAN  array  names.  For  example*. 

S(AAA)  *  (J)+(K,(F=*8(3)+C,Q(5))+M=*S(R)} 

Oata  structure  definition  statements  may  be  continued  from  one  card 
image  to  the  next  if  the  last  non-blank  character  on  the  card  to  be  con¬ 
tinued  is  either  ,  or  +. 

AFM/mlh 
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APPENDIX  C 


THE  PROGRAM  DESIGN  LANGUAGE 


A.  INTRODUCTION 


The  algorithms  and  program  segments  for  MADEM  have  been  developed 
using  a  program  design  language  (PDL).  The  use  of  PDL  permits  design  to  be 
expressed  without  the  necessity  of  using  an  implementation  in  a  standard 
programming  language  to  specify  the  design  detail. 

Traditionally,  narrative  descriptions,  decision  tables,  and  flowcharts 
have  been  used  to  describe  the  design  of  a  software  system.  These  techni¬ 
ques  are  now  being  challenged  by  program  design  languages  such  as  that  used 
for  the  MADEM  design.  These  PDLs  provide:  (1)  a  vehicle  to  trans¬ 
late  functional  modeling  concepts  into  program  design;  (2)  a  replacement 
for  design  logic  flowcharts;  and  (3)  a  means  for  communication  between  tech¬ 
nical  'and  nontechnical  personnel,  designers  and  developers. 

PDL  also  has  the  advantage  of  having  a  closer  relationship  to  program¬ 
ming  languages  than  traditional  methods  of  expressing  design,  thereby  per¬ 
mitting  a  more  direct  mapping  of  design  specification  into  code. 

PDL  is  English-like  in  its  means  of  expression  and  follows  certain 
semantic  and  syntactic  conventions.  The  concepts  of  structured  programming 
are  applied  in  the  form  of  basic  control  structures  for  logic  flow  and  in¬ 
dentation.  Top  down  programing  is  implemented  by  specifying  in  PDL  the 
top  level  portion  of  the  program  and  evolving  the  PDL  into  succeeding  levels 
of  detail.  There  is  considerable  latitude  in  the  selection  of  predicate  and 
function  descriptions  which  may  be  in  English,  in  a  computer  language,  or 
some  combination  of  both. 

The  PDL  is  used  for  both  the  actual  design  framework  of  the  program  as 
well  as  for  algorithms  appearing  only  in  hard  copy  form.  The  use  of  PDL 
eliminates  the  need  for  all  flow  charts  and  provides  a  self -documenting 
capability  for  the  program  itself.  Realization  of  an  implementation  consists 
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simply  of  adding  the  necessary  coding  to  the  logical  design  statements. 
Thus,  the  design  language  and  the  implementation  language  coexist  in  the 
final  source  code. 

B.  CONTROL  STRUCTURES 


Four  types  of  control  structures  are  used:  sequential  composition, 

DO  WHILE,  IF-THEN-ELSE,  and  CASE.  By  suitable  combination  of  these  four 
types,  programs  and  algorithms  of  any  complexity  may  be  expressed.  These 
basic  structures  are  combined  with  an  indentation  notation  which  is  used 
to  delineate  the  bounds  of  each  structure  in  the  program  or  algorithm. 

The  keywords,  DO  WHILE,  IF-THEN-ELSE,  CASE,  etc.,  are  written  as  struc¬ 
tured  comments.  This  permits  the  predicates  for  DO  WHILE,  IF-THEN,  and 
CASE  to  be  written  in  more  natural  terms  since  they  do  not  have  to  be  in¬ 
telligible  to  the  compiler.  In  implementation  they  are  followed  immediately 
oy  the  associated  programming  language  code  statements.  Thus,  the  programmer 
has  the  ability  to  write  programs  in  true  structured  style  usin„  language 
elements  of  his  own  choosing,  along  with  the  implementation  of  the  structure 
using  a  standard  programming  language.  In  this  way,  the  coding  and  design 
documentation  are  carried  along  in  one-to-one  correspondence. 

In  the  structured  comment  format,  each  comment  is  begun  with  an  asterisk 
to  visually  delineate  comment  lines  from  coding  lines.  A  comment  may  be 
continued  on  the  next  line.  However,  the  continuation  line  does  not  have 
the  asterisk  header  and  starts  one  column  farther  to  the  right  than  the 
initial  line  of  comment.  Thus,  if,  for  a  given  indentation  level,  the  com¬ 
ment  asterisk  appears  in  column  n,  the  first  character  of  the  comment  con¬ 
tinuation  will  start  in  column  n+1.  All  implementation  statements  also 
start  in  column  n+1;  if  an  implementation  statement  is  continued,  all  such 
continuation  lines  start  at  column  n+2.  Thus,  the  structured  skeleton  of 
the  program  design  in  POL  is  easily  followed  by  the  identifying  asterisks 
which  introduce  the  structured  comments.  Each  subsequent  indentation  level 
is  started  three  columns  farther  to  the  right  from  the  previous  level  to 
indicate  nested  structures. 
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Sequential  compositions  are  shown  diagrammatically  in  Figure  C-1  and 
are  written  on  the  same  indentation  level,  as  in  this  example: 

^INITIALIZE  CONTROL  VARIABLES 
♦READ  INPUT  OATA 
♦BUILD  OATA  STRUCTURE 

♦TRAVERSE  DATA  STRUCTURE,  GENERATING  OUTPUT 

The  IF-THEN-ELSE  structure  shown  in  Figure  C-2  is  illustrated  by: 

*IF(predicate)THEN 
♦BLOCK  1 

♦ELSE 

♦BLOCK  2 
♦BLOCK  3 

If  the  predicate  is  satisfied,  then  8LOCK  1  is  executed.  BLOCK  1  is 
automatically  terminated  by  the  appearance  of  ELSE  on  the  same  level  as 
the  IF-THEN.  Thus,  following  completion  of  BLOCK  1,  control  is  passed  to 
BLOCK  3  (which  is  actually  a  sequential  block  following  the  IF-THEN-ELSE 
block,  appearing  here  only  for  purposes  of  illustration).  If  the  predicate 
is  not  satisfied,  then  SLOCK  2  is  executed,  followed  by  BLOCK  3. 

An  alternate  form  of  the  IF-THEN-ELSE  structure  is  shown  in  Figure 

C-3  and  occurs  when  there  is  no  ELSE  part: 

♦IF(predicate)THEN 
♦BLOCK  1 
♦BLOCK  3 

If  the  predicate  is  satisfied,  then  BLOCK  1  is  executed,  followed  by 
BLOCK  3.  If  the  predicate  is  not  satisfied,  BLOCK  1  is  not  executed,  and 

control  passes  immediately  to  the  execution  of  BLOCK  3. 
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The  DO  WHILE  structure  is  shown  in  Figure  C-4  and  has  the  form: 


♦DO  WHILE (predicate) 

♦SLOCK  1 
♦ENDDO 
♦BLOCK  2 

BLOCK  1  is  executed  until  the  predicate  becomes  FALSE.  The  use  of  the  ENDDO 
statement  is  optional. 

A  variant  on  the  DO  WHILE  is  the  DO,  sometimes  a  more  natural  means  of 
expressing  the  conditions  for  executing  the  subordinate  block.  Its  action 
is  identical  to  the  DO  WHILE: 

♦DO(predicate) 

♦BLOCK  1 
♦BLOCK  2 

Another  type  of  control  structure  is  the  CASE  structure  shown  in 
Figure  C-5.  This  is  used  to  select  one  of  several  possible  blocks,  depend¬ 
ing  upon  the  value  of  an  expression.  Its  structure  can  be  seen  by  the 
following  example: 

♦CASE (express  ion) 

♦Expression  value  =  1 
♦BLOCK  1 

♦Expression  value  =  2 
♦BLOCK  2 


♦Expression  value  =  n 
♦BLOCK  n 

♦BLOCK  A 
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The  expression  is  evaluated  and  control  is  passed  to  a  particular  block, 
depending  upon  the  expression  value.  Following  completion  of  the  specified 
block,  control  is  passed  out  of  the  CASE  structure  to  the  next  sequential 
block,  BLOCK  A. 

C.  SEGMENTATION 

Programs  are  subdivided  into  segments,  both  for  purposes  of  multiple 
references  and  to  aid  intellectual  manageability.  Each  segment  is  labeled 
with  a  name  to  identify  it.  The  name  may  be  any  English  phrase  of  one  or 
more  words  which  serve  to  identify  the  segment,  usually  chosen  to  describe 
its  function.  The  segment  identification  occurs  as  the  first  structure 
comment,  using  the  keyword  SEGMENT  for  identification: 

♦SEGMENT (GENERATE  OUTPUT  OISPLAY) 

The  segment  identification  may  then  be  followed  with  arbitrary  comments 
which  provide  further  information  on  the  Durpose  of  the  segment  and  its  data 
and  control  interface,  as  needed.  These  explanatory  comments  do  not  use  the 
asterisk  header  so  that  there  will  be  no  accidental  confusion  with  the 
actual  control  structures  which  follow. 

Segments  may  be  referenced  by  using  the  keyword  INCLUDE  as  in  this 
example: 

*  INCLUDE (GENERATE  OUTPUT  DISPLAY) 

The  close  of  a  segment  is  always  indicated  by  the  statement: 

END 

D.  PROGRAM  DESIGN  AND  IMPLEMENTATION 

The  program  cesign  process  involves  a  complete  logical  specification 
of  the  program  in  POL.  All  logical  steps  are  expressed  in  the  language 
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so  that  another  person  can  fully  comprehend  the  logical  process  being 
speci fied. 

Combining  these  ideas  permits  the  writing  of  algorithms  and  programs 
of  any  complexity.  As  an  example,  consider  the  following  segment  which 
specifies  an  algorithm  for  traversing  an  n-ary  tree,  where  each  node  of 
the  tree  is  represented  by  a  linked  list  of  sibling  cells,  each  of  which 
has  a  pointer  to  a  descendant  node.  Thus,  each  sibling  cell  has  two 
pointers,  one  for  the  sibling  cell  and  one  for  the  descendant  node. 

♦SEGMENT (TRAVERSE  N-ARY  TREE) 

*£NTER  ROOT  NODE 
*TRAVERSE=TRUE 
*8ACKUP=FALSE 
*00  WHILE (TRAVERSE) 

*IF(N0DE  CELL  HAS  DESCENDANT  AND  BACKUP=FALSE ) THEN 
*0ESCEN0  TO  DESCENDANT  CELL 

*£LSE 

* BACKUP  TO  PARENT  CELL 
*IF(RQQT  NODE) THEN 
*TRAVERSE=FALSE 
*BACKUP=TRUE 
END 


When  the  POL  structure  is  implemented,  the  programming  language  state¬ 
ments  are  inserted  immediately  following  the  corresponding  PDL  statement. 

In  many  cases,  the  implementation  of  a  simple  PDL  structure  will  contain 
additional  microstructure.  Such  microstructure  should  also  follow  the 
same  rules  for  indentation  of  its  logical  elements. 

As  an  example  of  the  implementation  of  PDL  into  FORTRAN,  consider  the 
implementation  of  the  above  example  for  traversal  of  n-ary  trees.  The 
tree  cells  are  stored  in  a  FORTRAN  array  IQ  with  a  pointer  LTREE  for  the 
root  cell  of  the  tree.  Each  cell  contains  two  pointers,  with  the  first 
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cell  word  containing  the  sibling  pointer 
the  descendant  pointer.  A  pointer  value 
which  terminates  the  pointer  chain.  The 
written  as: 


and  the  second  cell  word  containi 
of  zero  indicates  a  null  pointer 
implemented  segment  can  thus  be 


C 

C 

C 


C 


c 

c 

c 

1000 

c 

c 


c 

c 

1200 

c 

c 

c 

1300 

1500 

2000 


♦SEGMENT (TRAVERSE  N-ARY  TREE) 

SUBROUTINE  TRAVERSE(LTREE) 

A  PUSHDOWN  STACK  ISTACK  WITH  POINTER  J  IS  USED  TO  BACKTRACK 
TOWARDS  ROOT  NODE  OF  TREE 
COMMON/TREE/ IQ( 1000) 

DIMENSION  ISTACK(IOO) 

♦ENTER  ROOT  NOOE 
L=LTRE£ 

J=1 

*TRAVERSE=TRUE 

ITRAV=1 

*8ACKUP=FALSE 

IBACK=0 

♦DO  WHILE (TRAVERSE) 

IF(ITRAV.EQ.O)  GO  TO  2000 

*IF(NQDE  CELL  HAS  DESCENDANT  AND  BACKUP=FALSE)THEN 
IF(IQ(L+1 ) .EQ.O.OR.IBACK.NE.O)  GO  TO  1100 
♦DESCEND  TO  DESCENDANT  CELL 
ISTACK( J)=L 
J=U+1 
L=IQ(L+1 ) 

GO  TO  1500 

♦ELSE 

*IF(NODE  CELL  HAS  SIBLING  CELL) THEN 
IF(IQ(L).EQ.O)  GO  TO  1200 
♦MOVE  TO  SIBLING  CELL 
L-IQ(L) 

*BACKUP=F\LSE 
IBACK=0 
GO  TO  1500 

♦ELSE 

♦BACKUP  TO  PARENT  CELL 
J=J-1 

L=ISTACK( J ) 

♦IF(R00T  NODE) THEN 
IF(L.NE.LTREE)  GO  TO  1300 
*TRAVERSE=FALS£ 

ITRAV=0 
♦BACKUP5*  TRUE 
IBACK=1 

GO  TO  1000 

RETURN 

END 
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MIDAS  TABLES 


/MIDAS  CDC 
/DEFINE 

ABINFO( I SPACE)* < (NEXT**ABINF0(30> . NRACTYP ( 30  > ) , 

( N0AC0H ( 30  > , PTPACDB=*ACBB ( 30 ) ) , 

NORMRQ. 

NOREARMG, . 

NOREFUELQ, 

NOLAIJNCHQ, 

NOUSE) 

ABGUEBB ( I SPACE >*< (PNEXT* * ABOUEDB <  30 ) , CLASS ( 30 ) ) , 

VALUE 1 (SPACE), 

VALUE2 ( SPACE ) , 

VALUES (SPACE) ) 

ABSTATUS ( I SPACE )  =  ( ( PACT AE*— AB I NFO ( 30 ) , NOACTAB ( 30 ) ) , 

( PTR2QUES=-QUEUES  <  30 > , NOACONAE <  30 >  > , 

ABDAMAGE ( SPACE ) ) 

ABVCR ( I SPACE )  =  ( ( PN£XT=*ABVCR ( 30 ) ,  PTRABSB=*S3 ( 30 ) ) , 

<  PACTAB=*ACTAB ( 30 ) , NOACTAB ( 30  > ) ) 

ACDBC  ISPAi:E)=*<  (NEXT *«ACDB ( 30 > ,  NRACTYPE ( 30 )  ), 

MAXSPEED< SPACE), 

CRU I SESPEED ( SPACE ) , 

MAXALT I TUBE ( SPACE ) , 

M I NAL  T I  TUBE  (  SPACE , 

MAXCLIMBDIVE (SPACE). 

FUELCONSUME ( SPACE ) . 

AOSRANGE ( SPACE ) , 

RADARC3  ( SPACE  > , 

ATTACK  RAD I US ( SPACE ) , 

MAXFUEL ( SPACE ) ) 

ACQBUF  < ISPACE)»( (PTRACO**ACODEVICE( 30) , NUMDEVf 30) > ) 
ACODEVICEi ISFACE)=( ( PNEXT=*ACQDEVICE ( 30 ) , TYPE ( 30) ) . 

( WORKING  <  30 ) , PACQDB--AOOE ( 30 ) > , 

( .JAM ( 30 ) ,  LEVEL(30>  )  ' 

ACRFTL 1ST ( ISPACE>*( ( PNEXT=*ACRFTLIST ( 30 > , AC  RFT I D ( 30' ), 
NlJMACRFT, 

FORMTYPE) 

ACRFTONAB (  ISPACE)»(  ( PN£XT=-ACRFTONAB( 30) ,  ABID(30)  >, 
(ACRFTLISTf  30),  NUMEL0K3  (  30'  i  > 

ACT  AB ( I SPACE ) * ( ( PNEXT*«ACTAB ( 30 > . NRACTYP (30)  ) , 

<  NOACOH ( 30 ) ,  NOACASN ( 30 ) ) ) 

ADOLINK ( I3PACE>*( ( NEXT=*ADDL INK ( 30 > . 10(30) ' ' 

ADS I TEDB ( I SPACE )  =  ( ( PNEXT *»ADS I TEBB  < 30), ADTYPE ( SO) >, 
(M0DVAL1  (30) -INSTANT,  MAXDIGESTdO  >  ), 

( M  A  X  C  Y CLED I C'E 3 T ( 30  ) .  MINTIMEDIGEST '  SO)  ' , 
LOSTTIME ( SPACE  > , 

LASTCHANC  E  ( SPACE )  — LOWRESP'r  I  ME  ( SPACE ) , 
ENOAGEWINDOW ( SPACE ) , 

MODVALZ'f  SPACE), 

MODVAL3 ( SPACE ) , 

( COVONONE ( 30 ) . ONE ( 30 ) ' , 

( COVONFEW ( 30  > ■ FEW ( 30 ' » . 


291 


(  COVONMANY  (30).  MANY  <  30  >  ) . 

T I MEFL I  GHT  l  *  PAC  E ) , 

M 1  ;.S  I LERANuE  (  SPAC  E > , 

(MAX  AES  ION  i  30) .  MO  OVAL  A  <  30  >  t-DILSIZE) . 

MODVALS  ( SPACE )  +TSEEKTAC  (  SPACE ) . 

MAX  TRACK  RANGE  ( SPACE )  -‘-TCHKCOV  ( 'SPACE  ) . 

LOCK.uNT  I  ME  03  PACE )  +TSEEK  ENG  <  SPAC  E ) , 

MCDVALc,  ( SPAC  E )  +H I L I M  ( CP  AC  E  > , 

M0DVAL7  <  'SPACE )  +LCNL I M  (  SPAC E ) . 

CONVLUAD, 

<  SNUKELOAD ( 30 ) , LNUK ELOAD <  30 ) ) , 

( CVRESUPF LY  FREC!  ( 30 ) ,  RE31JPPL  YC  V  ( 30 )  ) . 

( SNRESURPL YPREw (30),  RESUF PLYSN ( 30 ) > , 

<  LNPESUPF LYPPEO <  30 ) , RESUF PLVLN(  30) ) 1 
ALLOCATE!  I  SPACE )  =  (  ( PUP=*  ALLOCATE  <  30) ,  RDuWN=*ALLCCATE(  30  )  ) , 

( AMMOTYF'E  (  30 ) ,  F'FU=-°-F  I  PEON  I T  (  30'  < 

ANYDIL(  I  SPACE )  =  (  ( F  UP=* ANYO I L ( 30  > .  PDCWN=<*  ANYD I L  (  30 )  ), 
(FPERC=*PERLISTC30),PDtE=-OIE( 30) 

( LOC  (  3>:> ) ,  PR  I  OR  I  TV  (  30 )  ) , 

<FRIL'P=»ANYDIL(  30),PRIDN=*ANY0IL(  30)  >. 

( DCOV  <  3C> ) ,  SHORT  (  30 )  > , 

( PDELAY=-DAC€  ( 30 > , PENOEV=»EVENT ( 30 ' ' . 

< PAL ( 30 ) . NULL ( 30 ) ) ) 

AOOB  (  I  SPACE )  =  (  (  NEX  T=*AGOB  <  30 ) ,  NRAQTYP  (  30  )  ) . 

RANGE! SPACE) . 

NOOSE  1 , 

NOOSES ) 

ARC '"SAW'  I  SPACE) » t  !FNEXT=*ARCFTSAW(30).  FSE=*SB(  3''"  )  . 

< ADDRESS* -HEX  < 30 ) ,  TYPE ( 30 ) ) . 

damage (space) > 

ARC.-rSTATUS(  I  SPACE)  «<  i PFLTBB=*FLTDB ( 30 ) ,  PMON I T I CNS  =  ♦MON (  30'  l , 

( P3TRTHX=*HEX  ( .30 ) ,  PENDHX=~HEX  <  30 )  ) , 

(PNXTHX=*HEX(30) ,  PAIRBASE=»-3B  (  30)  ) , 

(  NOLL  1  (  30 )  .  PA  I  RTC'T=-»S£  ( 30 )  )  . 

( PCNDTOT =*SB ( 30  > , NUMAIRCRAFT! 30) ), 

(FLITELEG!  4) ,  INTERCEPT3T ATUS  (  4  > .  ALTUBECHNG <  u  , . 

PROF I LEND X  <  4 > , LANDNG( 4) , ORB I TST AT ( 4 ) , A I PCOMGAT ( 4 ) , 
NULLS  (  4  ) ,  JAMSTAT  (  4 ) ,  DUMMY  (  34  )  )  . 

PJEL, 

ALTITUDE (SPACE), 

SPEED ( SPACE  > . 

D I  RECTI  ON  ( SPACE ) 

ATTACKELOK; ISPACE>  =  <  (PNEXT=»ATTACKEL0M 30).FNXT0TL=*STDCL0K  ( 30'  ' , 

<  prmaktg=*-f ak:  tgelgk  (  30 > .  nofmakt  :  30  >  > . 

(  I  SECTOR  (  30 ) ,  FNX  TCRD=-COF  R I  OORBLOF  (  30)  >  > 

3LCK  HEAD  (  ISFACE)a(  (STATUS (24),  TIMEGOT ( 17) ,  ALLOC  ATCR<  10).  type<  T )  >  ) 
BOCDlL (  I  SPACE'  =  <  (  FUP=»BOCDIL  (  30 ) ,  PDCWN=<-BOCD  IL  (  30)  )  , 
(PPERC=-PERLIST(30>,  PDrE=-DIE( 30) 

( LOC ( SO ) , PR  I OR I TY ( 30 ) ) , 

( FR I UP=*BOCD I L ( 30 ) . PR I DN= -BOCD I L ' 30 ) ) . 

( DCOV ( 30  > , SHORT ( 30 ) > , 

! PDELA y=*DAOE ( SO ) , PENOEV»*EVENT ( 30 ) ) , 

<  p='AL=*PAL  (  30 ) ,  PSUE=»SUBL  I  ST  (  30 )  )  ) 

DOC  NOCHANC  MSG '  I  SPACE )  =*  (  NIJLL 1 , 

NULLS', 
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NULL 3, 

i  NULl4  <  30 1 .  PTGTSE»*-SB  <  30 )  >  > 

BOOST  AT  (  I3PACE)=(  (AUTO  (.30) ,  READY  i  30)  ), 

< POD  I  G=»E7ENT  (  30 ) ,  PSDEL Y=»EVENT  <  30 )  ) , 

( PAD  I  L=*BOCD  I L  ( .30 ) .  NAOII_(  30)  > . 
(PHFOQ=*EOCDIL< 30) , PTFOO=*BCC OIL ( 30) ) , 

£  r  HND I  FPL  1 3  T  (  30 ) .  PTND  IL=^P'ERL  I  3T  (  3  0  ) 

( HPR 1 OR=»BC  CO  I L  <  30).  TPRIOR— EOCOIL’.  30)  1 . 
( PPD IL=*BOC D I L ( 30 ) , N IJMRDY ( 30 ) > , 

( PSDAQ**DAOE  (  30) .  PTDAO=«-DAOE  ( 30  )  )  > 
EOCTGTLOSTMSO < ISP AC E)=( NULL 1 . 

MJLL2. 

NIJLL3, 

(NULL4C30) , PTGT3B=*SB( 30) ) ) 
SORBSTAf.  13 PACE) *(  (aijTqc  30).  READY <  30)  >. 

( PS-D 1 0— ♦EVENT (  30) .  P'3DELY=»EVENT  £  30'  ) . 

<  PAD I l**ANY DIL< 30  > , NAD I L ( 30 )  ) , 
iFwFOC'=»ANYDIL (  30) .  PTFOC'=*ANYDIL(  30)  ) , 
£  PHND  I  L=-»  ANYD I L  <  30 ) ,  PTND I  L=»ANYD  IL  (  30 ) 

<  HPR  I  OP=»ANYD  I L  (  30  > .  TPF:  I  OR— ♦any  DILI  30  > 

<  OD I L=  ♦ANYD I L ( 30 ) , CAP AC  I  TV ( 30 ) > , 

( PMDAU= *DAOE  £  30 ) . PTDAO=»DAC€ ( 30  ) ) ) 
3TRvDIL£ : SPACE)  =  < (PUP=»BTRYDIL< 30) . PDOWN=»BTR YD  I L ! 30 ) ) , 

(  PPERC=«-PERL  I  ST  (  30  > .  PD  I  B-*D  I B  (  30 )  ) , 

£  LOC  (  30 ) ,  PR  I  OR  I  TV  (  30 )  ) , 

<PRIUP=-BTRYDIL'.  30) .  PRIDN=-BTRYDIL(  30)  >, 

<  DCOV ( 30 ) ,  SHORT ( 30  > ) , 

(  PBELAY=»DAC€  ( 3  0 ) .  FENOEV= ♦EVENT  ( .30 )  ) , 
'^AL— ♦ALLOCATE  (  30 ) .  NUKE  (  30)  ) , 
f  CEASE  < SO  > ♦PD I BAS3N**D I B, ASSNPR I OR <  30  > ) . 
( WA I TTOTRACK <  SO  > ,  WA I TTOF IRE ( SO ) ) , 

START (SPACE), 

END (SPACE) ) 

3TPYF I  REMSG  £  I  3PAC  E )  =  ( NULL  1 . 

NU1  I  2, 

NULLS. 

£ MISSILES (30) , EMPTY(SO) ) ) 

3TRY3TAT ( I  SPACE )  =  < ( AUTO ( 30 ) . NUM ( SO ) > , 

( PSD  I  >3=  ♦EVENT  ( SO ) .  F'SDEL  Y=*E  VENT  (  30  )  ! . 
<PADIL=-BTRYDIL<  30) . NADIL ( 30 ) ). 
(PHF'30=*BTRYDIL(30:  .  PTFOO=»BTRYDIL<  30)  > , 
<PHnDIL=»pfrlIST<  30), PTND IL=»PECLI ST ( 30' 
( HPRIOP=»CTRYDIL ' 30). TPRIOR=»BTRYDIH  30) 

<  TRACK ED=»BTR YC IL ( 30 ) ,  I DLE ' 30 ) ) . 

i  PHDAC^^DaC'E  (  30 ) ,  PTEACwDAiI'E  (  30 )  )  ■ 

(  PTL  (  30 ) .  A 1  £  30  )  -m3  AMMO )  . 

( RESUPPLY  (  30 )  .  AD  (  30  )  »N  t  AMMO+TC'TAMMO  ) . 

( NUCNO ( 30 ) , A  3 ( 30  > ♦NS AMMO ) . 

(  AMTOT  (  30 ) .  NUMENO 30 )  ’  ) 

BYCcASEMSOC  I  :.PAi3E)a<NULLl, 

NULLS, 

NULLS. 

<  PTOTSB»«SE ( SO  > , NULL4 <  30 ) > ) 
ByENOFROGMSG  ( 3  SPACE  >  =  <  NULL 1 , 

NULLS, 
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(FTGTSE=*SB(  30  >  ■  NULL4(  201  ) 

B YFLTATTM3G ( I  SPACE )  =  ( NULL 1 , 

NULLS’, 

NULLS, 

(  PT0TSB=*SB  ( 30  > .  NK I LLED 30 '  1 , 

TIME  ('SPACE)  ) 

BYNOC  HANCMSO  (  I  SPACE )  =  ( NIJLL 1 . 

NULLS, 

NULLS, 

<  PTGTSB=-S.B  ( 30  > ,  NULL4  (  ;:0  >  ) , 

TIME (SPACE) ) 

BYRELOAOMSG  (  I  SPAC  E  ■  ( NULL  1 , 

NULLS, 

NULLS', 

( POUNDS ( 30  > .  NFFP ( 30 ) ) ) 

BYTRKCHGMSG  < I SPACE )  =  ( NULL1 , 

NULLS, 

NULLS, 

( PTGTSB=«SB  ( SO ) ,  NIJLL  A  ( 30 )  ) , 

TIME (SPACE) ) 

BUFFER ( I SPACE ) * ( (FSTART=*LINK( 30) , NUMLINK ( 30 ) ) > 

CS  < I SPACE ) = ( UN I TNUMBER , 

( pijP»*C2  <  SO ) ,  PBOUN=*CS  ( 30 )  > , 

<  PSB-»SB  (  30 ) ,  F'NEXT =-*C  S  ( SO )  ) , 

( IJNITTYPE  ( SO ) ,  SIDE ( SO )  )  ) 

CS'3IDE(  I'3PAC£>  =  (  (PTRIC>WN**C2)S0),  SIBECSO)  > ' 

C  FA  I  NBLOK.R  (  ISPACE)  =  (  ( NULL(30 ) ,  PNEXT=*CHAI  NBLOKR  <  30)  )  ) 

COMMAND ( I  SPACE ) » < ( PN£X  T=*C  OMMANB ( SO ) , NUMACTS ( 30 ' ) . 

( TMFLO <  30 ) , ADDFES 3=~PEX ( SO ) ) , 

TIME ( SPACE)  1-  ACTION) 

CGNSTBLGK  ( I SPACE  >  * ( COPDSLOPE  ( SPACE ) , 

Y I NTLBUF ( SPACE  > , 

Y I NTLCOP ( SPACE ) . 

Y I NTRCOP ( SPACE ) , 

YINTRBUF(SPACE), 

X SPREAD ( SPACE ) , 

YSPREAD ( SPACE > , 

ENTRYSLOPE  <  SPACE > , 

YL INENTRY (SPACE), 

YENDCORD( SPACE) ) 

CORR I BGRBLOK.  ( ISPACE)  =  ( (PNEXT=*CORRIDORBLOK (30), NRCCRD(SO) >, 

( PABVSCOR-*ABVCR ( SO ) , MOABVC R ( SO  > ) , 
(PLH£X=«HEX ( SO) , PPHEX=*HEX ( SO  > ) , 

(PCHEX— ►HEX(SO) , NHWIDTH(SO) ) . 

( PHLI3T»-‘HEXBL0K ( 30 ) ,  PEDCN?,T=*CONSTELO>  (SO)  ) 
DEPTHCR ( SPACE ) . 

ANGCORDOSPACE), 

ANG3PRD(  SPACE) , 

BUFFWDHf SPACE)  ) 

COVERFU  (  I  SPACE )  =  (  ( F NEXT**COVEPFU ( 30 > . PAL=*ALLOCATE ( 20 )  ), 

( NULL ( 30 ) , AMMO ( 30 ) ) ) 

CRCDEADBLGK ( I SP ACE  >•( ( PSEERSE ( 20 ) ,  NULL (30)), 

( BEADUN I TSB ( 30  > ,  l  JN I TTY  PE ( 30  >  > > 

CRCM3C0AT A (  r3PACE>  =  ( < MSGTYP ( 30 ) , PSN0R3B ( 30 ) ) , 


( PTOTPB (  30 )  +PDEAPSE*PMOVRSB-^LOS'T3B-t-P  I NT3B. 
TOTTYP  (  30 >  +DEADTYP+ADDRESS  ->-NULL-HVUMACFT  )  ) 
CRCSEEBLUE (  ISP  ACE)  =  <  <PN£XT=*CRCS-EEBLUE(30),  10(  30)  ), 

( PSB=*SB ( 30 ) , ADDRESS»*HEX l 30 ) ) ) 

CRCSEERED ( I SPACE )  =  < ( PNEX  T=*CRC3EERED <  30 ) , ID  <  30 ) ) , 

<  PSB-*SB ( 30 ) , ADDRE3S=*HEX ( 30 ) ) , 

( RPT ( 30 > , HUNTER ( 30 ) ) , 

DIRECT ION (SPACE), 

( PNXT3ER**SEER ( 30 ) , NUM5EE ( 30 ) > ) 

CRCSEES  < ISP ACE ) » <  (  REDSEE=*CRC3EERED ( 30  > , NUMRED ( 30 ) ) , 

<  BUJESEE=*CRCSEEELUE  <  30 ) , NUMBLUE ( 30 ) ) ) 
CRC3UB0RD  ( I  SPACE )  *  (  (PNEXT=»CRCSUB0RD<30> ,  ID(30>  >, 

( PSB*«SB C  30 ) , ADDRES3»*HEX  <  30 ) ) , 

<  ABSCRMBLFLG  ( 30 ) ,  BTNASNDCNT  (  30 >  * 

ACRFT  ASN2AB+ 

NTRCPTR ASNMNT  * 

NUMACONAB ) ) 

CAGE ( I  SPACE >  =  (  ( PPREV=*DAOE  <  30  > , PNEXT=-DAC€ ( 30 ) ) , 

( ACT  I D ( 30  > , PTR  <  30 ) ) , 

<  ARO 1 ( 30 ) , PNDA=»DAQE ( 30 ) > , 

<  AR02 (  30  > , AR03 ( 30 ) ) ) 

OAT  BUCK  (  I  -SPACE '  =  <  ( PNEXT- -OATBLOK  ( 30)  ,  CLASS  ( 30 )  ) , 

( PAD3 1 TE=-AD3 1 TEBB  <  30 ) - 
PFORH»*FDBDBLOK> 

PFLTOB**FLTDB+ 

PACBB="‘ACDB+ 

ppaybuf=-*paybuf+ 

PPROF  IL**PROF  I  LEDELOKf 
PAGDB=*AODB+ 

PABGUE»«*ABGUEDB+ 

P ACONAB= *  ASRFTONAE + 

PCLASS, NUMBLOK ( 30  > ) ) 

DATBUFUSPACE>*(  <  POATSLK—OAT3LOK ( 30 ) ,  NUMBLOK  '  30 )  )  ) 

DBCLAGSELOK < I3PACE)»< (PNEXT=*DBCLASSEL0K<30> , CLASS < 30) ) , 

( PTR  (  30 ) ,  NUMBER  (  30 )  )  ) 

CEATHBLOK ( I SPACE )  =  ( ( PSB«*SB ( 30 > , PADR**HEX < 30 ) ) , 

(UNITTYPE( 30) , SIDE( 30) ) ) 

0 1 B  < I SPACE )  -  (TIME ( SPACE ) , 

(SIDE (30) , NUMAC( 30 ) > , 

(LOST< 30), POSITION; 30)), 

heading (space), 

VELOCITY (SPACE) • 

ALTITUDE (SPACE) ) 

DUMMY BLOCK ( ISP  ACE)  =  ( (PNEXT(30>,  NEWKEY(SO) )  ) 

ENGBATUPDMSG ( I SPACE ) * <  NULL 1 , 

NULL2, 

NULLS, 

( PTGTSB»*SB ( 30  > , COVER ( 30 ) ) , 

3TART0PP ( SPACE ) , 

ENDOPP ( SPACE ) , 

(PDIB»*DIB(30) , PRIORITY ( 30 ) ) ) 

ENORESULT  (  I  SPACE  >  -  (  ( NK.  I LLED  ( 30 ) ,  PFU  (  30 )  )  ) 

EVENT  ( I  SPACE )  ■»  (  ( NEHMEN**SB  ( 30 ) ,  I NCDNT  ( 30 )  ) , 

( PTRUP»*EVENT (30, P TRDOWN«*EVENT ( 30 ) ) , 

<M3C<30> , LASSEN»«SB(30) ), 


TIME (SPACE)  ) 

FAKTOBLOM  ISPACE>«<  i  F'NEX  T=«F  AKTGELOK  <  30 ) ,  PNXFRDB=*FDBDI3L0K  l  :0)  ) , 


( PFLT AKT = *FLT AKTBLOK  <  30  )  ,  NOFLAt-  T  l  30  )  )  I 

FDBDBLUK t ISPACE)=< ( PNEXT=*FDBDELuK ( 30 ) . NRF0RM<30> ) , 
(PTRFLT»FMFLTDB<30>,  NOFLTL(  SO) ), 

SPFORMC ( SPACE ) ) 

F I REUN I T ( I SPACE )  =  ( <  AMMO<  SO). PNEXT=*F I REUNIT ( 30)  ), 

( PDIL=»BTRYDIL  C 30 ) , STAGE ( 30 )  ) . 

( CEASE (  30 ) . PEN6cV=*EVENT ( 30 ) ) , 

( CAMMO ( 30 ) , BUSY ( 30 ) ) , 

( N 1 Anno ( 30 ) , N2AMM0 ( 30 ) ) ) 

FLTAKTELOK < I3PAlE)=< ( PNEXT=*,FLT AkTBLOK ( 30 ) , PNXFLDE=*FLTDB ( 30 ) ) , 
( NOACFLT ( 30 ) , F'FLAB3E=  *SB  <  30 ) ) , 

(  PNXAC AB=*AC TAB  (  30 ) ,  PTRFRAO»*CC>MMANO <  30  I  >  . 


PFLT3B=-SB ) 

FLTEB  (  I SPAC E)  =  (  (  PNXFLDB=-FLTDB  (  30 ) .  NRFL  r  TE  (  30  >  ! , 

< PTYPLD3— •PAYLOAD  (  30 ) ,  NOPYLDS  (  30 )  ) , 

( PTYAQDB=*AODB <  30 ) . PTACDB=-ACDB ( 30 >  ) . 

< MA  X  NO AC ( 30 ) , M I NNOAC ( 30 )  ) , 

( niJLTAC  (  30 ) ,  PROF  I  LE=*PROF  I LEDELOH  (  30 )  ) , 

SPFLTC <  SPACE ) , 

D I ST SEP  <  SPACE ) ) 

FLTDEADNSO ( I S PAO E ) = ( NULL i . 

NULLS, 

NULL  3, 

,  PSB=*SE  (  30 ) ,  PADR=*HEX  (  30 )  ) , 

( UN I TTYPE  <  30 ) , S I DE ( 30 ) > ) 

FNFLTDE'  <  I  3PAC  E )  =  (  ( PNEXT =»-FMFLTDB  ( 30 ) .  PNXFLDB=*FLTDE‘  (  3'0 )  )  ) 

FOREST  < I  SPACE )  =  t  < PNEXT=«F OREST ( 30 ) , NR TYPE ( 30 ) ) , 

PTREE=»TOTPTREE ) 

FOF.'MAT ION (  ISPACE)=(  ( F'FORM=*W I NONAN ( 30 ) ,  NUMFLT3 ( 30 )  )  ) 

FORMAT I ONBLOK ( I SPACE )  =  <  ( PNEXT =»FORMAT I ONBLOK ( 30 ) , PNXFRDB=*FDBDELC K ( 

<  NOFRMRQ  <  30  > ,  NOFRMAL ( 30 > ) ) 

FCRTGTBUFFER( ISPACE)=( ( PF0PEST=*F0RE3T ( 30 ) * 

PTGT,  VARWGRD  <  30  )  >  ) 

OARBLQK < I SPACE >  =  <  ( NULL ( 30 )  .  PNEXT»*OARBLC'K 1 30 ) ) ) 

HEADBLOC  K ( I SPACE  >  =  (  <  PL I ST (  30 ) ,  (COUNTER  ( 30 )  )  ) 

HEX  < I SPACE )  =  < < HEX NUMBER ( 30 ) ,  LEVEL  <  30 ) > , 

<  PUP=»HEX < 30 ) , PDOWN=*HEX ( 30 ) ) , 

(TERRAIN (30), PNEXT =»hEX i 30 ) >, 

( PUOL=*BUFFER ( 30 ) . REEPER=*BUFFER ( 30 ) ) ) 

H6XBL0K< I SPACE ) =< I  TOTAL, 


<PHEX4=-HEXLINK( 30) . NCLIST1 ( 30) ) , 
(PHEX1=*HEXLINK( 30),N0LIST2( 30) 

(PHEX3=-HEXLINK  (  30),  N0LIST3(30:  ), 
<PHEX*=*HEXLINK(30), N0LIST4( 30) >. 
(PHEXUNK=*H£XLINK(30>,  NOLI STUNK (20) > ) 

HEXELEV ( I SPACE ) = ( ELEVAT ( SPACE ) ) 

*- EXLINK  (  I  SPACE  )  =  <  <  PNEXT =*HEXLINK  (  30 ) ,  HEX  (30)  )  ) 

LEFTREE ( I SPACE ) = ( T I ME ( SP ACE ) , 

(  PE  VENT = *EVENT  !  22 ) ,  D I  ST  (  4  ) ,  F'LEFT =»LEFTREE  (17), 
PRITE=*LEFTREE( 17) ) ) 

LINK  (  I  SPACE  )  =  <  (  F'NEXT=*L  INK  ( 30 ) ,  PSB=»SB( 30  i  >  ) 

L 1 3TENDPTRS ( I SPACE )  =  ( ( PHEAD ( 30 ) , PTA I L ( 30 ) -NENT ) ) 

LOAD ( I SPACE >  » <  ( PNEXT»*LOAD ( 30 ) , TYPE ( 30 ) ) , 


30 )  >  ■ 
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(  AMOUNT  (  30 ' ,  PCRDDE='PAVLOAO  (  30  >  )  > 

LOST COVER (  ISPACE>=(  <  FNEX  T=-LOSTC  OVER  (  3'0  )  ,  PDIL=»EOCDIL(  30)  )  , 

( NULL ( 30 ) .  PR  I OR I TV ( 30  > '  ) 

LOST 3 X GHTBLOK ( X SPACE )»<  < NULL ( 30 ) ,  NOSEER < 30 > ) , 

(  ARC  FT  <  30 ) ,  ADDRESS  (  30 )  )  ) 

MESSAGE ( I SPACE )  =  ( ( PTR ( 30 ) ,  FREGM  30 ) ) , 

<  VALUE  1  <  30 ) ,  VALUES’  <  30  >  )  *  (  VALUES  (  oO )  )  . 

( TYPE ( 30 ) , LENGTH <  30 ) ) ) 

M  I SS I LEF I R I  NO  (  I  SPACE  )  =  (  <  AMMOTYPE  ( 30 > ,  PFIJ  (  30  >  ' , 

TIME INTERCEPT (SPACE) > 

HUN  <  I  SPACE )  =  (  (  PAG“*LOAD  ( 30 ) .  NUMAG  <  30 )  ) , 

( PaA=*LOAD <  30 ) . NUHAA( 30)  )  > 

NOAVA I LBLOK  (  ISF  ACE)  »<  F'NEXT=*NuAVA  (LBLOK  . 

P.jDAMAGE  (  SPACE ) , 

PSTDELOK  =~STDBLOK  ) 

ORDERS ( I SPACE)=< (PTRF0RNS=*F0RMATICN(30) , PTPACT=*i:OHHAND( 30) ) ) 
PAL  (  I  SPACE )  =  (  <  FI_)PT=*PAL  !  30) ,  PD0WN7=-PAL  (  30)  )  , 

( PUPE=*PAL ( 30 ) , PDCWNE=*PAL ( 30 ) ) , 

START (SPACE), 

END < SPACE ) , 

(COVER (30), PD I L=— BOC  D I L  < 30) ) , 

<  PEVENT=»EVENT ( 30 ) . PSUE=*SUBL I  ST ( 30 ) ) : 
PATENGAGE  (  ISP  ACE )  =  (  (PIJP=*PATENGAGE(30) .  FDOLN=*PATENGAGE(  30)  ). 

<  PDIL=-BTRYDIL i 30 ) , STAGE , 30 ) ) , 

<  CEASE ( 30 ) , F  ENGEV=-EVENT ( 30 ) ) > 

PAYEUF < I SPACE ) =< (PNEXT=*PAV2UF( 30' . NRPDCLSv 30) > . 

( PAYLQOB=*PAYLDDBLOK ( 30 ) . NUHELC K ( 30 ) ! ) 
paylddelok  t  ::-pace)  =  (  (  next=*paylddi3lok  csoi  ,  type  index*  :o>  >  > 
PAYLOAD  (  ISP  ACE)  =  (  (PNXTYPD=*PAYLOAD(  30  ) ,  NF:PDCLS(  30,  )  , 

<  MAXAMT ( 30 ) ,  HINAMT ( 30 ) ) , 

(MAXF I RERANOES 30) , PAYLDDE=*PAYLDDEU3K ( 30) ) > 
PERL  I  ST  <  1 3PAC  E)  =  (  (  PuP=*P£RL  I  ST  (  30  > ,  PDOWM-* PERL  I  ST  (  30 )  ) , 
(PCE=*SE( 30’ , PDIL=*ANY0IL<30> ) , 

( SEEN  <  30 ) ,  PS3=*-SCURCE  (  30  >  ’ , 
(PUPCHN=*PERLI’3T(30) ,  PDNCHN=-P£RL  I  ST  (  30)  )  . 

TIME (SPACE) ) 

PLAVEREUFFER( I SPACE )  =  ( ( PTRPL=-PLYLST ( 30) .  VARWCRDi 30) ) ) 
pleuffer  < :  spac  E  '  =  (  (  ptrpl=«cd  ;  SO ) ,  VARWORD  (  30  )  )  ) 

PLYLSTi ISPACE)  =  <  ( I LW ( 30  > ,  IRW=«PL3UFFER ( 30 )  ) ) 

POSSCOVERt  'SPACE)  =  (  (  F’NEXT=*-POSSCOVER l  SO ) ,  POIL=*EOC D IL  (  X>>* 

pbat=»suel::t). 
(PPAL=*PAL ( 30) . FFIORITYt  30> )  ) 

PROF  I LEDELCP  (  I  SPAC  E)  =  (  <  PNXPRDB=*PROF  I LEDELOH  <  30  > ,  NRF’R  OFL  (  30  >  > . 
ALTCREN < SPACE ) . 

ALTCVGT ( SPACE ) . 

ALTOAE( SPACE) ) 

PUE)JFFER<  I  SPACE)  «l  (PSTaR’T  =  -LINK  (  30 ) .  NUHLlNt*:  <  30'  i  - 
QiJE  STAT  (  I  SPACE  )  =  (  REALNUMEEP  (  SPACE )  > 

GU£UES( I SPACE ) = ( <NEXT=«0UEUES(3O) , 0UENUM(30) ), 

<  PTR ( 30 ) ,  NUMBER (30 ) ) , 

( PGDB»*AGG>JEDB  <  30 ) ,  PGUESTAT  (  30 )  '  > 

RAIDBLOK ( I  SPACE)  =  (  <  PNE X T= -PA I DELOK ( 30 ) , NRRAID( 30)  ) . 

(  PTRWAVE=~WAVEBLOK  (  30 ) ,  NOWAVES  (  3C' )  > . 

<  PTRCORD=*C  C'RRIDC'RBLOK  !  30 ) ,  NCCCFDS  (  30  )  )  i 
REAC'YCUE  (  ’.SPACE)  «(  <  PNEXT=-READYQUE<  30) ,  NRACTYP(  30)  ) , 
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<  NULL  <  30 ) .  NUMAC  RT ( 30  >  >  > 

RELLI3T  (  1 SPAC  E  )  =  (  (  PNEXT=- FELL  1ST  (  30  >,  PFU=*FI  REUNIT  (  JO)  )  ) 

'3  AMASS 1 GNMSG  (  I  SPACE !  =  <  Nl.iLL  1 , 

NULLS, 

NULLS, 

(  PTGTSB=*SB  <  30 ) ,  TGT 1 L  (  30 )  +NC  OV ) , 

STARTOPP ( SPACE > , 

ENDOPP! SPACE). 

<PDIB=«DIB<30>, TGTPRI0R(30) ), 

( EMPTY ( 30 ) , DCGV ( 30 ) ) ) 

SB  (  I  SPACE )  =  <  ( ADDRESS=*HEX  ( 30 ) ,  PC2=<h32  ( 30 )  ) , 

( PSDB««SDB ( 30 ) , PFEL=*EVENT( 30) ) +CUMLTI VBAMAGE, 
( PACQ**ACQEUF  <  30  > ,  I D  ( 30 )  ) , 

<  DATABASE ( 30 ) + 

AEFORMTYP,  PABSTATU3=*ABS1 ATUS < 30 ) * 


parcftstat=*arc ftstatus* 

P BOOST AT =*EOCST AT  > 

PBTRYSTAT=-BTRYSTAT<- 

RE0ARCFTIJPCNT+ 

STATUS ) ) 

SL'Bt  IS:PACE>  =  <  ( P 3B=»SB 1 30 ) ,  P3EEBUF=*SEEBUF  ( 30 )  -i-PSEE^CRCSEES  > , 
( SUBURB  I  NATE=— SUB  (  30 ) ,  CRD=*ORDERS  (  30  >  «• 

PRA I  B=*RA  I  BBLC'H  )  ) 

SEEBUFC I  SPACE )  =  <  ( PTRSEE=*ARCFTSAO(  30 ) ,  NUN  I  rS  <  SO )  )  > 

SEER ( I  SPACE )  —  ( (PNEXT=*SEERi30>. PSEERSB( 30 ) >  > 

SOURCE < I SPACE )  =  <  < PSB=*SE <  30 > , PNEXT=*SOURCE ( 30 > ) ) 

STDBLOK t I SPACE )  =  >  t PNEXT=-STt'BLGK ( 30 ) , PTGT3E=*SB< 30) ) , 
PTGTLTR=*TGTPTRE£, 

DAMGPERt SPACE), 

PADRPER'=*HEX  ) 

SUB < I SPAC E)  =  <  < PSUB= -SUBTYPE i SO > , NUMBER ( 30 ) ) > 

SUBLIST  <  I  SPACE )  =»  (  ( PSB=*-SB<  30 ) ,  PNEXT=*SUE:LIST  ( 30 )  >, 

( AUTO  <  30 ) +DEATHMARK, NUMFU ( SO )  ) , 

<RAMM0<30>, L0AD(3O) ), 

( PDELAY* «  DACE ( SO ) , NOUSE ( 30 ) ) , 

<  PPAL«*PAL ( 30 ) , ADORE 3S=*HEX ( 30  > ) ) 

SUBTYPE ( I SPACE! =< ( FNEXT»«SUBTYPE ( 30 ) , TYPE ( 30 ) ), 

( PTRSUB»*CRC3UEORD  ( 30 ) ,  NUMBER  (  30  >  )  ) 
TARGETELOK ( I3PACE)  =  <  < PN£XT=*TARGETBLOK< 30) ,  NRTGTYP ( 30 ) ) , 

( PTRFCRM=»FORMAT IONBLOK  <  30 ) , NOFORM ( 30 ) ) , 

(  ptotatk=*«attackblok  <  so  > ,  notgtak  ( 30  >  > , 

<  MAX ACAL ( 30 ) , NOACALC ( 30 )  ) , 

(MAXRHEX (30) , M I NRHEX ( 30 ) ) ) 

T  ARGETEUFFER < ISPACE)=< <PTR=»C2< 30), VARWORD(SO) ) ) 

TARGETL I STELOK < ISPACE)=( ( PTRTYTL**TTDBLOK ( SO ) , NOTYTPL ( 30 ) ) ) 
TGTPTREE  <  I  SPACE )  -  < DAMAC.E  ( SPACE  > , 

(  INVALID!  1  ) .  P3TDBL0K=**STDEL0K  ( 21  ),  BIST  (A), 
PL£FT«»TGTPTFEEl 17) , PR I TE“*TGTPTREE ( 1?) ) ) 
TRACK  I NGBLOK  <  I  SPAC  E  >  =  <  ( Nl.iLL  (  30  > .  PSEERSB  (  30  )  ) , 

<  PMOVRSB ( 30 ) , ADDRESS ( 30 ) ) > 

TTDELOK ( I SPACE ) - ( ( PNEXT— .TTDBLOX ( 30 ) , NRTGTYP ( 30 ) ) , 

( PTGTPL»*StDEL0K ( 30 ) . NOTGTPL ( 30 ) ) ) 

UMPDAT  (  I  SPACE )  *  <  ‘MISSILES  (27) ,  AMMOTYPE(3>,  ENGUN I TTYPE  (  30)  ', 

<  PTGT3B=-SB  (  30 ) ,  PFIJ  (  30 )  )  ) 

WAVEELOK (  ISPACE)  =  (  ( PNEXT=-WAVEELOK ( 30) . NRWAVE ( "0>  >, 


( PT OTVPE**T ARGETBLOK  (  30 ) ,  N0T0TVP  (  30  )  ) , 

STARTT  I  ME  (  SPACE ) , 

DURATION (SPACE) ) 

UJ I NGMAN  (  I  SPACE )  =  (  ( PNEXT=*-WINGMAN(  30) ,  PSB=*SB(  30 )  )  ) 

/ MACRO 

♦COMMONAAPK  * 

COMMON/AAPkYAAPK  <  10  > 

♦COMMONACFRAG* 

COMMON / AC  FRAG / NSECTOR .  PTGTHEX .  PADRCG,  PHEXENT,  TATREND,  PHEXEXT 
♦COMMONAFM* 

COMMON/ AFM/ JINX 
♦CGMMONA6PD* 

COMMON/ AOPD/ AGPD ( 30 ) 
tCOMMONAGPK* 

C  OMMON  /  AC’PK /  AOPK  (  23c > 

♦COMMONBLKTYP* 

COMMON /EL/ TYP/KEEA3E,  NULKTP,  LNGBLK ( 500 ) 

♦COMMONCLOOK* 

common/clook/istabl, nrsrv, I STAB ( 1 ! 

SC  0MM0NC0M0UT $ 

C0MM0N/C0M0UT/LEL( 10,  3) ,  LELCT 
tCOMMONCOMPTR* 

COMMON /COMPTR/ 

♦  PHXTOP, PTRELUE, PTRRED, PELTOT, PRDTOT, PTRC2, 

♦  PEUJPL.  PPEDPL,  PTRPL,  PUASTC,  PLASTS,  LSIDE,  LHEX, 

+*  PTRCDB,  PTRLDB,  PTRRDB,  PTRTTDB,  EUFZN, 

♦  IGMSRT,  IDY3RT,  PTRDATA,  PTuPORD.  PREDSEE.  ISIZE 
♦COMMONCOMSCS* 

COMMON / CCM3C3 / LM ASK.  RMA3K .  INITCEL, TREETOP, ENDTIME,  INCTIME, 

+  OTIME,  CELMARK,  OUTIME,  NVPEL,  LMAX,  CELMINT,  LPTR  (  20 ) 

•COMMONCRCCOM* 

COMMON/CRCCCM/IEVENT, psb, padr, itype, iside 
% C  0MM0NC3TK  $ 

C0MM0N/C3TK/  IP3TK. ( 300 ) ,  L.  LLMAX.  NSTK 
♦COMMONDATA* 

COMMON/DATA/PTRDAT 

scommondebug* 

COMMON/ CHECK/ I CHKPTR <  10).  UASTVAL (10) 

'COMMON/ DEBUG/ DBGA .  DBGB,  DEO,  DBGD 

COMMON/ GFL AOS/  I DEBUG,  IDUMP,  IDATFLG,  ISTOP.  IPECOVR,  I TRACE,  IRLSE 
COMMON/ XTRACE/  I TRPTR,  TRAC  I R  <  50 ) ,  TRAPTR.  TRAPDSOO), 

*  T I MEPDS ( 30 ) , I COUNT ( 320 ) , R03FLA0 
COMMON/FTEXT/  SEOTXT( 320) ,  NOSEG, SEGFLAG ( 320), SECT I ME (  320) , 

+  DBGFLAG < 320 ) 

COMMON/BLKDEG/IBLKHD,  IBLK3T,  IBLKAL,  I ELKRL ,  NEURAL <  500 ) , 

*  NBLKRL ( 500 ) 

INTEGER  3EGTXT,  SEGFLAG,  SEGNUM,  DBG FLAG 
INTEGER  'RACIR. TRAPTR.  TF ARDS 
♦COMMONFS* 

COMMGN/FS/PTRFS.  PTRR3L,  MXSPCE,  ID, MXELKR, LOARB ( 20 ) 

♦COMMONHALT* 

COMMON/HALT/ IFSTOP,  CPULIM,  CELTIME,  LEVEL (  20 ) , 

*  GTIMLIM.  N0EVNT3,  NClEVLIM 
♦COMMON I N I TPTR* 

COMMON/ INI TPTR/PTRADR,  P* TRC2.  PTRSDB,  PTRFEL,  PTRACO,  PTRCCM, 
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*  PTRSTAT,  PTRSEE,  PTRSUB.  PTRORD,  MYTYPE,  MYSIDE 
•COMMON I NTMSG* 

COMMON/  INTMSG/MESSAOE.  PTOTSB.  I  TYPE,  PINTLST,  PINTSE,  PTGTELh 
•COMMON I ODEV* 

COMMON/ IODEV/ IN.  NUOIL,  ND,  IOUT,  IH0LD<2).  IFETCH<2> ,  I EREAK ,  NOHOLDS 
SCOITMON.JUOPT* 

COMMON/ JOOPT/ I OP 
*COMMONLIi1ITS* 

CCMMON/L  I M I  TS/  LOWER,  LUPPER 
•C0MM0NMA3KS 

COMMON/MASK/ IL,  IR,  ILM 
SCOMMONMODVAR* 

CCMMON/MODVAR/  INCDNT,  NEHMEM,  LASSEN,  TIME,  MSG,  PTRGOD,  RSEED 
•  COMMONMXMISS 

COMMON / M XM I  5 / M X GUP  < 3,  3) 

SCOMMONORD* 

COMMON /ORD/ TEAS, TCOM 
SCOMMONPATHS 

COMMON/PATH/LASTP,  LREP,  LASTR (  I Tii 
♦CCMMQNPERCEEV* 

COMMON/PERCEEV/XSEER,  YSEER, XIEEN, YSEEN, RANGE,  BEARING. MASK 
•COMMONSAMPk* 

COMMuN/SAMPK/SAMPk  A  ( 3,  3  > ,  SAMPKB  ( 3,  3  > 

•COMMONS AMPTRS* 

COMMON/SAMPTRS/PMYDATA, FOIL, PPPINFO, PBINFO,  POINFO,  FEAT, 

*  PPAL.PFU 
•COMMONSECTOR* 

COMMON / SECT OR / PDAT . XB, YD, VX, VY, I FLAG, BEARING, VELQCTY, OHEAD, 

*  RELHEAD , CL I NE, OFF , X , Y 
•COMMONSEM I NFO* 

COMMON /SEM INFO/I VALUE  <  20 ) , VALUE <  20 ) ,  I FLAG 

♦commonspace* 

COMMON/ SPACE /BLANK, I SPACE ( l ) 

•COMMONS PACE 1 00* 

COMMON /SPACE /BLANK, I SPACE ( lOOOOO) 

•COMMONSPACESO* 

COMMON/SPACE/BLANK, ISPACE ( 50000 ) 

♦COMMONS PSTAT * 

COMMCIN/SPSTAT/ 1 CTG I M  <  20 ) ,  I CTREL  ( 20  > 

SCOMMONSTATBD* 

COMMON/STATED/PFLTTYP(  i  ) ,  PTRMUN,  PTRSTRT,  P TREND,  PTRNXT,  PTF'AB. 

+  NIJMTGT,  PTGTSB,  PGNDTGT,  NUMAC,  LECSTA,  INTSTA,  IALTCNG.  NDXPROF, 

+  LNDSTA, IORBSTA, IAIRCOM, IGNDATK, JAMSTA, FUEL, ALTUDE, SPEED, DIRECT 
•COMMONTHTRPLN* 

COMMON  / THTRPLN / PFOREST ,  PNOAVAL 
•COMMONTRACK* 

COMMON /  TRACK /  PFADR,  ISIDE 
•COMMONTYPES* 

COMMON/ TYPES/ I ARRAY ( 3000 ) 

•DIMEQLEV* 

DIMENSION  SPACES  1) 

EQU I VALENCE  < I SPACE ( 1 ) , SPACE ( 1 ) ) 

LEVEL  2,  ISPACE, SPACE, BLANK 
•IMPLICIT* 

IMPLICIT  INTEGER <H, P ), LOGICAL ( Z ) 
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SNOSEG* 

NOSEG 

/END 


APPENDIX  E 

THE  OYNAMIC  EVENT  SCHEDULING  ALGORITHM 

An  event  stepped  simulation,  such  as  TAC  REPELLER,  is  controlled  by 
one  or  more  time  sorted  lists  of  event  notices,  where  each  event  notice 
represents  the  occurrence  of  some  event.  At  the  start  of  the  simulation, 
all  the  notices  in  the  event  lists  correspond  to  exogenous  events,  i.e., 
events  which  are  externally  generated  and  act  as  a  driving  function  for  the 
simulation.  As  the  simulation  progresses,  time  is  incremented  as  each 
event  notice  in  the  event  lists  becomes  current.  An  event  notice  initiates 
a  computational  process  which  may  generate  additional  event  notices.  In 
this  way  the  simulation  continues.  The  simulation  stops  whenever  the  event 
lists  are  exhausted  or  some  other  specified  termination  condition  occurs. 

The  passage  of  time  between  events  is  generally  very  irregular.  In 
fact,  consecutive  events  may  occur  at  the  same  instant  of  time,  or  there 
may  be  a  very  large  time  interval  between  them.  Event  stepped  simulations 
are  computationally  efficient  because  of  the  ability  of  the  event  scheduling 
mechanism  to  initiate  computation  only  at  those  times  at  which  something  is 
going  on  in  the  simulation. 

The  fundamental  problem  in  an  event  stepped  simulation  is  to  devise  an 
efficient  way  of  locating  the  next  event  notice  in  time  sequence.  This  can 
be  done  by  keeping  an  event  list  in  time  sorted  order  so  that  the  next 
event  notice  is  always  on  the  top  of  the  list. 

The  algorithm  for  maintaining  an  event  list  must  be  chosen  so  that  it 
is  computationally  efficient  to  1)  remove  the  event  notice  with  the  earliest 
time  from  the  event  list  and  2)  insert  a  new  event  notice  into  the  list. 

In  TAC  REPELLER  the  event  notices  for  dynamically  scheduled  events  are 
maintained  in  a  quasi-sorted  order  using  a  bifurcated  arborescence  called 
a  leftist  tree  (so  called  because  it  leans  to  the  left,  i.e.,  there  are 
predominatly  more  links  to  the  left  than  to  the  right).  The  algorithm  for 
manipulating  such  a  tree  is  such  that  the  top  cell  of  the  tree  (the  root) 
is  always  guaranteed  to  be  the  cell  with  the  earliest  scheduled  event  time, 
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even  though  all  other  cells  are  only  in  quasi-sorted  order.  Despite  some 
algorithmic  complexity,  the  leftist  tree  software  is  very  efficient. 

Each  event  notice  cell  contains  the  scheduled  event  time,  a  path  dis¬ 
tance  value,  a  pointer  to  a  left  subtree,  and  a  pointer  to  a  right  subtree. 
The  space  requirements  are  Q(n),  where  n  is  the  number  of  event  notices  in 
the  event  list. 

Since  the  scheduled  event  time  is  the  quantity  upon  which  sorting  is 
based,  it  will  be  referred  to  as  the  KEY  in  the  following  discussion.  The 
path  distance  D  is  the  minimum  path  length  from  the  node  to  a  leaf  of  the 
tree;  because  of  the  way  in  which  the  tree  is  constructed,  this  minimum 
length  path  will  always  be  a  rightmost  path.  The  pointer  to  the  left  sub¬ 
tree  will  be  denoted  by  LP,  and  the  pointer  to  the  right  subtree  will  be 
denoted  by  RP.  The  pointer  to  a  leaf  in  the  tree  will  be  assigned  a  value 
of  0.  The  lee.  does  not  actually  contain  any  explicit  information  and 
therefore  leaves  are  not  actually  represented  in  memory.  We  may  refer  to 
the  KEY  and  D  quantities  for  the  cells  comprising  the  roots  of  the  left 
and  right  subtrees  by  KEY(IP),  D(tP),  KEY(RP),  and  D(RP).  We  adopt  the 
convention  that  KEY (0)  =«,  and  D(0)  -  0. 

The  leftist  tree  may  be  defined  by  listing  the  properties  of  the  KEY 
and  D  fields  for  each  cell  P: 

01  KEY  CP)  s  KEY  CLP  (P) ) 

(21  KEY (PI  *  KEY (RP CP  11 
C31  DCP1  »  D(RP(P) 1+1 

(4)  D CLP (Pi  1  2  0(RP(P)1 

These  properties  ensure  that  any  path  from  the  root  to  a  leaf  traverses 
the  event  notices  in  ascending  time  order.  Thus,  the  root  always  contains 
the  next  scheduled  event  notice. 

Removal  of  the  root  of  the  leftist  tree  (i.e.,  removal  of  the  next 
scheduled  event  notice)  requires  a  constant  time.  However,  it  must  be 
followed  by  a  merging  of  the  two  subtrees  below  the  root  before  any  other 
operations  are  executed  on  the  tree.  Merging  of  the  subtrees  (both  of  which 
are  themselves  leftist  trees)  is  the  most  expensive  operation.  In  the  worst 
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case  this  requires  m  merge  steps  followed  by  m  interchange  steps,  where 
m  =  least  integer  not  less  than  log  (n) 
n  =  number  of  nodes  (event  notices)  in  the  tree. 

The  subtree  merging  is  not  required  if  the  right  subtree  is  vacuous,  and  is 
trivial  if  the  left  subtree  is  vacuous.  Thus,  merging  of  leftist  trees  re¬ 
quires  time  of  0(log  n)  in  the  worst  case.  Insertion  of  a  new  cell  into 
the  tree  also  requires  Q(log  n)  in  the  worst  case.  In  the  best  case,  merg¬ 
ing  and  insertion  require  a  constant  time.  Furthermore,  the  software  for 
merging  and  insertion  is  identical  so  that  only  a  single  routine  is  required 
for  all  tree  manipulations.  The  overhead  for  small  n  is  reasonable  and  the 
method  is  very  efficient  for  large  n. 

The  algorithm  for  merging  two  leftist  subtrees  P  and  Q  utilizes  a 
stack  for  saving  the  nodes  which  are  visited  during  the  tree  traversal. 

The  algorithm  is: 

*IF( KEY (SUBTREE  P)  IS  GREATER  THAN  KEY (SUBTREE  Q) )  THEN 
*  INTERCHANGE  SUBTREES  P  ANO  Q 
♦IF  (SUBTREE  P  IS  VACUOUS)  THEN 
♦SUBTREE  P  =  SUBTREE  Q 

♦ELSE 

♦MERGE  SUBTREE  Q  INTO  SUBTREE  P 
♦SUBTREE  X  =  P 
*00  WHILE (SUBTREE  q  EXISTS) 

♦QKEY  =  KEY(q) 

♦TRAVERSE  SUBTREE  X  ALONG  THE  RIGHTMOST  LINKS,  COMPARING  KEY 
AT  EACH  NODE  OF  X  WITH  QKEY ,  SO  AS  TO  LOCATE  THE  INSERTION 
POINT  FOR  Q  ACCORDING  TO  ASCENDING  KEY  VALUE.  SAVE  THE 
NODES  OF  X  WHICH  WERE  TRAVERESED  ON  THE  STACK. 

♦3REAK  SUBTREE  X  AT  THE  INSERTION  POINT,  SAVING  THE  SUBTREE 
OF  X  BELOW  THE  INSERTION  POINT  AS  SUBTREE  T. 

♦APPEND  SU8TREE  Q  TO  SUBTREE  X  AT  THE  INSERTION  POINT,  USING 
THE  LEFT  LINK  IF  IT  IS  NOT  ALREADY  IN  USE:  OTHERWISE  USE  THE 
RIGHT  LINK. 

♦SU8TREE  X  =  Q 
♦SUBTREE  Q  =  T 

*00 (FOR  ALL  NODES  SAVED  ON  STACK  DURING  TRAVERSE,  STARTING  AT  LAST 
INSERTION  POINT  AND  ENDING  AT  THE  ROOT) 

*IF(DISTANCE  TO  LEAF  FROM  LEFT  SUBTREE  SHORTER  THAN  FOR  RIGHT 
SUBTREE)  THEN 

♦INTERCHANGE  SUBTREES 

♦CALCULATE  DISTANCE  FOR  PARENT  NODE  OF  SUBTREES 
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An  example  of  event  sorting  using  the  leftist  tree  algorithm  will  now 
be  given.  We  start  with  the  leftist  tree  shown  in  Figure  E-l(a).  The 
event  notices  are  numbered  with  the  integers,  where  the  integer  value  is 
the  scheduled  time  for  the  event  notice. 

The  next  scheduled  event  1  is  removed.  This  splits  the  original 
tree  into  two  subtrees  as  shown  in  Figure  E-l(b).  We  must  merge  subtree  3 
into  subtree  2.  This  is  doen  by  traversing  subtree  2  along  the  rightmost 
path,  until  an  insertion  point  is  found  for  subtree  3.  This  insertion 
point  will  be  between  nodes  2  and  5.  A  subtree  with  root  5  is  detached  and 
the  subtree  3  is  appended  to  subtree  2  at  the  insertion  point.  This  pro¬ 
duces  the  configuration  shown  in  Figure  E-l(c). 

Now  subtree  5  must  be  merged  into  subtree  2.  Subtree  2  is  traversed 
along  the  rightmost  path  until  an  insertion  point  for  subtree  5  is  found. 

This  insertion  point  will  be  between  nodes  3  and  3  in  Figure  E-l(c).  A 
subtree  with  root  node  3  is  detached  and  subtree  5  is  appended  to  subtree 
2  at  the  insertion  point.  This  produces  the  configuration  shown  in  Figure 
E-Kd). 

Next  subtree  8  must  be  merged  into  subtree  2.  Subtree  2  is  traversed 
along  the  righmost  path  until  an  insertion  point  for  subtree  8  is  found. 

This  insertion  point  is  after  node  5  in  Figure  E-l(d).  Since  no  right  sub¬ 
tree  exists  below  node  5  at  this  time,  no  subtree  can  be  detached,  and  sub¬ 
tree  8  is  simply  appended  as  the  right  subtree  for  node  5.  This  produces  the 
configuration  shown  in  Figure  E-l(e). 

Subtree  merging  has  now  been  completed.  Now  the  nodes  traversed 
during  the  merging  process  must  be  traversed  in  reverse  order  and  subtree 
interchanges  made  as  necessary  to  produce  a  leftist  tree  (note  that  the 
tree  in  Figure  E-l(e)  is  a  rightist  tree).  The  subtree  with  root  node  5  is 
already  in  leftist  form  so  no  action  is  required. 

The  subtree  with  root  node  3  is  not  a  leftist  tree,  therefore  inter¬ 
change  the  left  and  right  subtrees  below  node  3.  This  produces  the  leftist 
subtree  with  root  node  3  shown  in  Figure  E-l(f). 
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Figure  E-l .  Example  of  Merging  of  Leftist  Trees 
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Figure  E-l .  Example  of  Merging  of  Leftist  Trees  (Continued) 
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The  subtree  with  root  node  2  is  not  a  leftist  tree,  therefore  inter¬ 
change  the  left  and  right  subtrees  below  node  2.  This  produces  the  leftist 
subtree  with  root  node  2  shown  in  Figure  E-l(g).  Since  node  2  is  the  root 
of  the  entire  tree,  the  entire  tree  is  now  in  leftist  form.  This  completes 
the  merging  process. 

Now  let  us  add  node  1  back  into  the  tree  of  Figure  E-l(g).  Since 
node  1  corresponds  to  an  earlier  time  than  any  node  of  the  leftist  tree 
into  which  it  is  being  merged,  we  see  that  node  1  becomes  the  root  node 
of  a  new  tree.  This  new  leftist  tree  is  shown  in  Figure  E-l(h).  Note  that 
its  form  is  radically  different  from  the  original  tree  in  Figure  E-l(a). 

This  example  represents  the  worst  case  situation  for  merging  two 
subtrees. 


APPENDIX  F 

MADEM  EVENT  CODE  DEFINITIONS 


EVENT  CODE 

MESSAGE 

CODE 

SCHEDULING 

SUBROUTINE 

EVENT 

12691111 

BADMOVE 

Schedule  CRC  Assignment 

12691111 

CRCLOSS 

Schedule  Assignment 

12691111 

CRCKIL 

CRC  Assignment 

12691111 

INT2CRC 

Schedule  CRC  Assignment 

12691111 

NEWMOVE 

Schedule  CRC  Assignment 

14651250 

GNOLOOK 

Target  found,  Schedule  Attack 

25120001 

1312 

INTASIN 

Request  interceptor  launch 

25120001 

1510 

INTASIN 

Message  to  interceptor  of 
assignment 

25120001 

2731 

BTNASIN 

Message  BTN  assignment 

25340001 

2751 

AMMOCHK 

Schedule  common  BTN  (Firing 

Support) 

25390001 

1310 

INTRFLY 

Request  orders  from  CRC 

25390001 

1340 

FUELCHK 

Schedule  commo  CRC,  Return  to 

Ai rbase 

25390001 

1984 

COMMAND 

Message  to  tower  to  land 

25390001 

1984 

INTRFLY 

Request  landing  from  Airbase 

25620001 

1330 

INTFINO 

Message  to  CRC  reporting 

direction 

25650001 

1300 

FLYSEE 

Schedule  interceptor  available 

target  dead  message 

2565001 

1312 

CRCTRAK 

Send  scramble  message 

25650001 

1320 

AIRTHNK 

Schedule  msg.  to  live  CRC  of 
availibility 

25650001 

1330 

CRC2INT 

Schedule  msg.  to  CRC  can't 
accept  assignment 

25690001 

2 

BNCMDPR 

commo  CRC  not  ready 

25690001 

2 

BNNOTRD 

Schedule  commo  CRC  not  ready 

J-'rh.Gtuu.c  L>JUu*-WOT  r IjJGO 


311 


MADEM  EVENT  CODE  DEFINITIONS 


EVENT  CODE 

MESSAGE 

CODE 

SCHEDULING 

SUBROUTINE 

EVENT 

25690001 

3 

8NP0NBB 

Schedule  commo  CRC,  ready 

25690001 

1310 

CRC2INT 

Schedule  interceptor  available 

message  to  CRC 

25690001 

1320 

AIRTHNK 

Schedule  msg  to  CRC  of  new  target 

25690001 

1340 

DOGTHNK 

Message  to  CRC  of  unavailability 

25690001 

1500 

BADMOVE 

Schedule  break  off  message  to 

interceptor 

25690001 

1520 

BADMOVE 

Schedule  msg  to  interceptor  of 

new  vector 

25690001 

1520 

INT2CRC 

Schedule  message  to  interceptor 
to  fly  towards  CRC  (Return  to) 

25690001 

1600 

BNCONLS 

Schedule  com mo  CRC  target  lost 

25690001 

1600 

BNCMDPR 

Commo  CRC  loss  of  sight  of  target 

25690001 

1600 

BOCTINK 

Schedule  commo  CRC  target  unseen 

25690001 

1620 

BNCONTC 

Schedule  commo  CRC  consider  track 

change 

25690001 

2752 

BYPONRL 

Schedule  commo  BTN  reload 

25690001 

2761 

BYHEDUP 

Schedule  commo  BTN  no  chance 

25690001 

2761 

BNLALLE 

Schedule  commo  superior,  no  chance 

25690001 

2762 

BYCONLS 

Track  loss  for  BTN 

25690001 

2762 

BYNWTRK 

Schedule  commo  BTN  track  change 

25690001 

2762 

BYCONTC 

Schedule  commo  BTN  track  change 

25690001 

2762 

8TRYTNK 

Schedule  commo  BTN  target  not 

sighted 

25690001 

2780 

BYPONER 

Schedule  engagement  results  for 

BTN 

25690001 

2790 

BYPONFD 

Schedule  commo  BTN  flight  dead 

25690001 

2831 

ALLOBAT 

Btry  engage  command 
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MADEM  EVENT  CODE  DEFINITIONS 


EVENT  CODE 

MESSAGE 

CODE 

SCHEDULING 

SUBROUTINE 

EVENT 

25690001 

2832 

8NP0NEP 

Schedule  commo  Btry  cease  fire 

25690001 

2832 

OECRALO 

Cease  fire  msg  for  battery 

25690001 

2832 

DROPPOS 

Schedule  commo  btry  ceasefire 

25690001 

2832 

OROPPS2 

Schedule  commo  btry  ceasefire 

25690001 

2834 

ALLOBAT 

Btry  coverage  update 

25690001 

2834 

DECRALO 

Coverage  update  message 

25690001 

2835 

8NC0NHD 

Schedule  commo  Btry  engagement 

data  update 

25930001 

1700 

GOGETEM 

Call  CRC  to  notify  of  takeoff 

31691000 

AIRTHNK 

Schedule  dogfite 

34342950 

ENGAGE 

Schedule  engage  Btry  fire 

34342951 

ENGAGE 

Schedule  engage  Btry  fire 

34692900 

AILOPAT 

Schedule  engage  Btry  (Lockon) 

34692900 

ALLOFU 

Schedule  engage  Btry  (Lockon) 

34692900 

BYTKCHK 

Schedule  engage  Btry  (Lockon) 

34692901 

BYPONER 

Schedule  engage  to  fire  again 

34692901 

PTPONER 

Schedule  engage  to  fire  again 

34692950 

BYPONTM 

Schedule  engage  Btry  fire 

39391313 

FLITE 

Schedule  next  fly 

39931313 

GOGETEM 

Schedule  launch  of  interceptor 

39931313 

TOWER 

Schedule  fly  flight  take  off 

62141100 

ATKASES 

Schedule  death  perception 

62311100 

DOGFITE 

Schedule  death  perception 

62391100 

SHRKILL 

Schedule  ptrgod  to  perceive  death 

62391313 

FLITE 

Schedule  Naybor  flying  plane 

62391380 

COMMAND 

Schedule  Naybor  ECM  on 

62391390 

COMMANO 

Schedule  Naybor  ECM  OFF 

MADEM  EVENT  CODE  DEFINITIONS 


EVENT  CODE 

SCHEDULING 

SUBROUTINE 

62931100 

TOWER 

62951100 

UMPIRE 

65141100 

SAMWYPE 

65141120 

ATTACK 

65250000 

C0MM0 

65311001 

DOGFITE 

65391350 

COMMAND 

65391400 

COMMAND 

65620000 

NAYBOR 

65621100 

DESTROY 

65651100 

KILFLIT 

65651400 

flysee 

65691400 

AIRTHNK 

67671234 

MADEM 

67674141 

THTRPLN 

69142/91 

SAMWYPE 

69142793 

SAMWYPE 

69311905 

DOGFITE 

69342890 

RELOAD 

69391375 

FLY 

6965001 

SAMSEE 

69651175 

FLYSEE 

69651375 

flysee 

EVENT 

Schedule  naybor  others  notice 
1 andi ng 

Schedule  naybor  flight  death 
Percept  superior  subordinate 
dead 

Schedule  perception  of  attack 
results 

Schedule  percent  reciever  (msg) 
Schedule  target  to  perceive  attack 
Schedule  rendevous  perception  of 
all  flights  in  formation 
Schedule  ground  target  perception 
Schedule  perception  of  unit. 

Notify  CRC  of  8tn  death 
Notify  CRC  of  subordinate  death 
Resume  ground  attack 
Schedule  resume  ground  attack 
Schedule  red  commander  to  begin 
plan  of  Raid. 

Plan  next  raid 

Ponder  superior  subordinate  dead 
Ponder  Btry  superior  dead 
Schedule  dogfite  outcome  ponder 
Schedule  ponder  Btry  reload 
Schedule  ponder  air  combat 
Schedule  ponder  message 
Schedule  interceptor  message  ponder 
Schedule  Air  combat  ponder 
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MADEM  EVENT  CODE  DEFINITIONS 


EVENT  CODE 

SCHEDULING 

SUBROUTINE 

EVENT 

69651400 

CRCEVNT 

Schedule  CRC  ponder 

69651410 

CRCEVENT 

Movement  event  code 

69651420 

CRCEVNT 

Loss  of  sight 

69651460 

CRCSEE 

Message  from  Airbase 

69651470 

CRCSEE 

Message  from  interceptor 

69651480 

CRCSEE 

Message  from  BTN 

69652790 

SAMSEE 

Schedule  ponder  flight  death 

69652800 

BYTKCHK 

Ponder  track  move 

69652805 

BYTKCHK 

Ponder  track  lost 

69692700 

ACCEPT 

Ponder  CE  track  info  digest 

69692700 

BNLALLE 

Schedule  digest  event 

69692700 

FILERUP 

Schedule  ponder  digest 

69692700 

NEWPERC 

Schedule  ponder  CE  (track  info 

digest) 

69692700 

READIL 

Schedule  ponder  Btry  digest 

69692700 

SAMATON 

Schedule  ponder  Sam  (Track  info 
digest) 

69692700 

SDIGEST 

Ponder  CE  Digest  track  info 

69692705 

CHKCOV 

Ponder  BTN  delayed  action 

69692705 

SEEKENG 

Ponder  BTN  delayed  action 

69692705 

SEEKTAC 

Ponder  BTN  delayed  action 

69692710 

BYNWTRK 

Ponder  Btry  last  chance 

69692710 

BTHEDUP 

Schedule  new  last  chance  event 

69692710 

BYCONHD 

Schedule  ponder  Btry  last  chance 

69692710 

BTRYTNK 

Last  chance  event 

69692710 

BNPONBB 

Schedule  ponder  BTN  last  chance 

event 

69692710 

CHKLAST 

Ponder  BTN  last  chance 
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MADEM  EVENT  CODE  DEFINITIONS 


EVENT  CODE 

SCHEDULING 

SUBROUTINE 

EVENT 

69692710 

PREPAFU 

Schedule  ponder  Btry  last  chance 

69692710 

SETASSN 

Ponder  BTN  chance  gone 

69692715 

ACCEPT 

Schedule  expected  sighting 

69692715 

BTRYTNK 

Reschedule  expected  sighting 

event 

69692720 

CHKCOV 

Schedule  opportunity  knocks  event 

69692720 

BNPONBB 

Schedule  opportunity  knocks  event 

69692890 

ADASASS 

Schedule  1st  reload/resupply 

for  each  fire  unit 

69692890 

BYPONRL 

Schedule  next  reload 

69692895 

RESUPLY 

Schedule  ponder  Btry  resupply 

69952790 

UMPIRE 

Schedule  ponder  Btry  flight  death 

69952792 

NUKBLNO 

Schedule  ponder  BTN  (subordinate) 

cut  off) 

69952794 

NUKBLNO 

Schedule  ponder  Btry  (superior 
cut  off) 

69952880 

UMPIRE 

Schedule  ponder  Btry  engagement 

results 

69992793 

CRCDIES 

Schedule  superior  death  event 

for  subordinate 

93651312 

ABSEE 

No  launch  event  scheduled. 

Schedule  launch  event 

93651984 

ABSEE 

Schedule  tower  to  land  flight 

93671313 

AC FRAG 

Schedule  takeoff  for  flight 

93931312 

GOGETEM 

Schedule  another  flight  for 

tower  to  launch 

93931312 

TOWER 

Notify  commander  of  flight 

1 andi ng 

95343000 

ENGAGE 

Schedule  UMPIRE 
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APPENDIX  G 

RANDOM  NUMBER  GENERATOR  CALLS 


MADEM  uses  the  random  number  generator  RANF  in  all  of  its1  MONTE-CARLO 
actions.  The  seed  for  this  uniform  random  number  generator  is  set  using 
the  routine  RSEED.  Both  RANE  and  RSEED  are  CD C  supplied  routines. 
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ALL  USES  OF  RANF  AND  RSEED  IN  MADEM 


SUBROUTINE 

RANF  LINE  NUMBERS 

RSEED 

LINE 

NUMBER 

COMMENTS 

AIRTANK 

70 

70 

R 

ATTACK 

81 

81 

R 

CANDTGT 

75 

75 

R 

CLIST 

-- 

43 

R 

CRCEVENT 

98 

98 

R 

CRCTRAK 

83 

83 

R 

DETECT 

89 

89 

R 

DOGFITE 

72 

72 

R 

FILERUP 

28 

28 

’r 

GNDLOOK 

35 

35 

R 

NEWMOVE 

29 

29 

R  Problem  of 
Error  Increases 
Over  Time 

OUTPTRS 

-- 

27 

R 

PTRAND 

16,  33,  38 

16, 

33, 

38 

R 

RELEASE 

-- 

22, 

34, 

45 

(Writes)  R 

SCHEDUL 

38,  50 

38, 

50 

R 

SDIGEST 

58 

58 

R 

SHRKILL 

30 

30 

R 

VMPIRE 

37 

37, 

37, 

39 

RSEED=RANCRSEED 

(SET) 


R  =  reference  only 
SET  =  RSEED  set  in  the  subroutine 
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appendix  h 

MADEM  SUBROUTINE  REFERENCE  LISTS 
AND  CALLING  HIERARCHIES 


LIST  0^  SUBROUTINES  -  M40£m 


1.  48QUEUE 

2.  48VSC0R 

3.  ACER  AG 

4.  404S4SS 

5.  4008L0K 

6.  AOOCrR 
T.  AOUMP 

8.  APCELl 

9.  APCEL2 

10.  ASS  I SN 

11.  ATTACK 

12.  AVAILBL 

13.  80ALT 

14.  30LEX 

15.  BOLRK 

16.  90BAAS 
IT.  9LK0AT 

18.  CANOTGT 

19.  CARD 

20.  CENTER 

21.  CHRGEN 

22.  CL  I  ST 

23.  CLIST2 

24.  CLOSCOR 

25.  cooeoi 

26.  COOE03 
2T.  COOEOS 

28.  C0CE18 

29.  COHMQ 

30.  CONTROL 

31.  C0R80UN 

32.  CREATE 

33.  CRFLTMt 

34.  08GREAO 

35.  OCCOmS 

36.  OELAOO 
3T.  05TSNX 

38.  OTSPaSO 

39.  0ISP4C0 

40.  OISPACL 

41.  QtSPACR 

42.  0TSP40S 

43.  OTSPAQO 
*4.  OISPOAT 

*5.  otsp^oa 

46.  OtSPPLT 
4T.  otSPPMF 

48.  OtSPOAP 

49.  OTSPOAY 

50.  OtSPRRO 

51.  OtSPOYB 

52.  0MS0EC 
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53.  OOGFITE 
5*.  OROP8LK 

55.  ENGAGE 

56.  ENTRyP 

57.  ENTSTAT 

58.  EOF 

59.  ERROR 

60.  EXIT3 

61.  EXTSCN 

62.  FEUOEL 

63.  FETCH 
6A.  FINORLK 

65.  FINOFLT 

66.  FLTGEOM 

67.  FLY 

68.  FO  RMTGT 
6  S'.  F  SOU^P 

70.  FSINtT 

71.  GETHEX 

72.  GETPTRS 

73.  GIMME 

74.  HALT 

75.  hEXAOO 

76.  hEXChZ 

77.  hEXDTST 

78.  HEX  I NV 

79.  mEXMLT 
30.  HEXMutT 

81.  HISTORY 

82.  HLTPNT 

83.  HOLD 

84.  HXOGTS 

85.  HXMLT2 

86.  ICHECK 

87.  I JZHX 

88.  inIT 

89.  INITACO 

90.  IP JL 

91.  ISOUMP 

92.  ISHIFT 

93.  I  TRAP 

94.  JGESUIT 

95.  jTJ 

96.  JUGGLE 

97.  COMPARE 

98.  LACELL 

99.  LCMLOC 

100.  LEXAN 

101.  LINE* 

102.  lnplot 

103.  LOAO»L 

104.  LOOKUP 

105.  LPKPRS 

106.  LTREE 

107.  LTRMRG 


loa. 

109. 

no. 

111. 

112. 
113. 
11*. 

115. 

116. 
117. 

ns. 

119. 

120. 
121. 
122. 
123. 
12*. 

125. 

126. 

127. 

128. 

129. 

130. 

131. 

132. 

133. 
13*. 

135. 

136. 

137. 

138. 

139. 
1*0. 
1*1. 
1*2. 
1*3. 
1**. 
1*5. 
1*6. 
1*7. 
1*8. 
1*9. 

150. 

151. 

152. 

153. 
15*. 

155. 

156. 

157. 

158. 

159. 

160. 
161. 
162. 


PaSE 

N-AOEm 

MASKER 

MESAGE 

NAY80R 

NOWUCIT 

NXTSYM 

OPTPTH 

OTHROAT 

OUTA 

OUTPTPS 

PACK 

page 

PEL AOO 

PERCEPT 

PLAN 

PLANOUT 

PONOEB 

PTREE 

PTRMRG 

BOCELL 

RECCON 

BECEB 

BECOVB 

BELEASE 

BEL  1ST 

BENOEVU 

REVISE 

BITET 

BtTEP 

BtTEB 

RLABOB 

BLCOBO 

BLEH4KT 

BLRATD 

RLTGTAK 

RLTGTYP 

RLMAVE 

POUTEB 

SChEOUL 

SCHTA8 

SECOND 

SELECT 

SECANT 

SHUFFLE 

SNAP 

SRCHOL 

tgtgone 

tgthst 

ThM2»S 

TmTRbln 

THX2XY 

Th2hx 

TlLHhX 

TLL2XY 

tower 
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163.  TRACE 

166.  TRPRMT 

165.  TRPRnT 

166.  TRPRRT 

167.  TT  l  ME 

168.  TXY2HX 

169.  TXY2HXL 

170.  TXY2LL 

171.  UMPIRE 

172.  UNPACK 

173.  UNSNAP 

174.  UOLLOAO 

175.  WIPEOUT 

176.  XSHIFT 
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LIST  OF  FOPTPAN  LI9P4PY  ROUTINES  -  *AO-M 


1.  ALOG. 

2.  ASIN. 

3.  ATAN2. 
A.  ATAN. 

5.  COS. 

6.  OECOOI. 
T.  ENOFIL. 

8.  ENO. 

9.  30T0CP. 

10.  INP8I. 

11.  INPCI. 

12.  INPCP. 

13.  INPFI. 

1 A ,  ITOJ. 

15.  0UT8T. 

16.  OUTCI . 
IT.  OUTCP. 

18.  Q1NTPY. 

19.  PANOOM. 

20.  PEW  I  NO . 

21.  SIN. 

22.  STOP. 

23.  Tan. 

24.  TAPES* 

25.  XTOI. 


f "  ■  m>n-  <wk 


SUBROUT t N£  REFERENCE 


1.  ABQUEUE 


2.  ABVSCOR 


3.  ACER Art 


A.  AOASASS 


5.  AOOBLOK 


6.  400CHR 


LIST  -  MAOEN 


P43E  6 


CALLS! 

ENTRYP 

SIMMS 

A009L0K 

FINOBLK 

EXITP 


called  By  t 

COOEOS 

COOE03 


CALLS!  CALLED  BY! 

ENTRYP  REVISE 

CLOSCOR 

GIMME 

ADDBLOK 

EXITP 


CALLS!  CALLED  BY! 

ENTRYP  SChEDUL 

GIMME 

CRFLTML 

A008L0K 

OPTPTH 

RELEASE 

FLTOEOM 

HEXOIST 

OELADO 

EXITP 


CALLS!  CALLED  BY! 

ENTRYP  CODE03 

GIMME 

FINOBLK 

GOTOER. 

OELAOO 

ADDBLOK 

EXITP 


CALLS!  CALLED  BY! 

ENTRYP  UOLLOAO 

EXITP  T3TLIST 

SEMANT 

OTHROAT 

NOKUCIT 

initaco 

finoflt 

CRFLTML 

C4NOTGT 

AOASASS 

acfrag 

abvscor 

abqueue 


CALLS! 


CALLED  BY! 
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I  SHI  FT 
TAPES# 
OUTCI. 


LSXAN 


PA3E 


7 


7.  AOUMP  CALLS  I  CALLED 

OUTCI. 

OUTCR. 

8.  APCELl  CALLSI  CALLED 

ISHIFT 

TAPES# 

OUTCI. 

9.  APCEL2  CALLSI  CALLED 

ISHIFT 

TAPE6# 

OUTCI. 

10.  ASSIGN  CALLED 

U.  ATTACK  CALLED 

12.  AVAIL3L  CALLS!  CALLED 

ENTRYP 


PELAOO 

RELEASE 

EXITP 

13.  30ALT 
u.  solex 

15.  90L9K 

16.  90PARS 

17.  9LK0AT 

18.  CAN0T3T  CALLSI  CALLED 

ENTRYP 

FIN08LK 

CLOSCOH 

JGESUIT 

FORHTGT 

GIHME 

AOOSLOK 

TGTGONE 

ptbee 

ranoom. 

PELAOO 

EXITP 

19.  CARO  CALLS!  CALLED 


8YI 

HALT 

RECCON 

3Y I 

LRKPRS 


8Y I 

LRKPRS 


9YI 

SELECT 

9Y  I 

SELECT 

3YI 

THTRPLN 


8YI 

THTRPLN 


BY  I 
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PA 


INPCI. 

EOF 

TAPE6* 

OUTCI. 

CHRGEN 

20.  CENTER 

CALLS  < 

ENTRYP 

EXITP 

CALLED  8Y 1 

TXY2HXL 

TLL2HX 

21.  ChRGEN 

CALLS  1 

CARO 

TAPE6* 

OUTCI. 

CALLEO  8Y! 

lexan 

extscn 

22.  clist 

CALLS  1 

PAGE 

lnplot 

HESAGE 

RITEP 

RITER 

RITEI 

TAPE6P 

OUTCI. 

OUTCR. 

CLIST2 

called  8y : 

HALT 

HEXCMZ 

FSDUMP 

FIND9LX 

23.  CLIST2 

CALLS  1 

PAGE 

lnplot 

mesage 

RITEI 

RITER 

TAPE6P 

OUTCI. 

OUTCR. 

RITEP 

CALLED  8yi 

CLIST 

24.  closcor 

CALLSI 

ENTRYP 

HEXOIST 

EXITP 

CALLEO  8YI 

CANDTGT 

A8VSC0R 

25.  COOEOl 

CALLS* 

ENTRYP 

GIMME 

RITEP 

EXIT® 

CALLEO  8YI 

SEMANT 

26.  COOE03 

CALLSI 

ENTRYP 

SRCNPL 

CREATE 

LOA0PL 

RITEP 

LNPLOT 

CALLED  3Yl 

SEMANT 

ABQUEUE 

ADASASS 

EXITS' 


PA3E 


9 


27.  COOE05 


28.  C00E18 


29.  COHMO 

30.  CONTROL 


31.  CORBOUN 


CALLS! 

ENTRYP 

SRCHPL 

EINOBLK 

GETHEX 

RITE  I 

RITEP 

LNPLOT 

UOLLOAO 

ABQUEUE 

TSTLIST 

IN  I T  AC(3 

HISTORY 

EX  I  TP 

CALLS! 

gethex 

3IHHE 

PACK 

unpack 

UOLLOAO 

RITEO 

RITEI 

LNPLOT 

TGTLIST 

HISTORY 


CALLS! 

ENTRYP 

LTREE 

SELECT 

SNAP 

UNSNAP 

RELEASE 

SECOND 

HLTPNT 

EXITP 

CALLS! 

ENTRYP 

GINHE 

THH2PS 

TXY2HXL 

HCXOIST 

SIN. 

COS. 

LINEX 

OPTPTH 


CALLED  BY! 


CALLED  BY! 


CALLED  BY! 
CALLED  BY! 


CALLED  BY! 


SEMANT 


SEHANT 


SELECT 

RAOEM 


THTRPLN 
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EXITS 


page 


10 


32.  CREATE 

CAlUSI 

entryp 

SIMMS 

EXITP 

CALLED  SY 1 

SRCHPL 

CRFLTML 

COOE03 

33.  CRFLTML 

CAULS  1 

ENTRYP 

create 

GIMME 

A008L0K 

HISTORY 

EXITS 

called  3yi 

acfrag 

34.  D9GREAQ 

CALLS! 

OUTCt . 

INPCI . 

EOF 

OECOOI . 

CALLED  8Yt 

MAOEM 

35.  OECOMS 

36.  iELAOO 

CALLS! 

ENTRYP 

MESAGE 

TRACE 

RECER 

gimme 

SNAP 

ltrmrg 

EXITP 

calleo  aYi 

THTRPLN 

AOASASS 

acfrag 

MAOEM 

37.  OGTSHX 

CALLS! 

ITOJ. 

38.  0ISPA8O 

CALLS! 

OUTCI • 

called  9YI 

DISPOAT 

39.  OTSPACO 

CALLS! 

OUTCI . 

CALLEO  3Y  ! 

oispflt 

oispdat 

*0.  OTSPACL 

CALLS! 

OUTCI. 

CALLED  9Y ! 

DISPACR 

*1.  OtSPACR 

CALLS! 

OUTCI. 

OISPACL 

CALLED  3Y I 

OISPDAT 

A2.  OTSPAOS 

CALLS! 

OUTCI. 

called  9y : 

OISPDAT 

43.  OISPAOO 

CALLS! 

OUTCI. 

CALLED  3 Y ! 

oispflt 
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44.  OtSPOAT 


45.  OtSPPOB 

46.  OTSPFlT 

47.  OISPF4F 

48.  DISPPAF 

49.  OISPPAY 

50.  OTSPP90 

51.  0TSPPY8 

52.  OMSOEC 

53.  OOGFITE 

54.  DPOPBL* 


CALLS! 

OUT  Cl. 

OISPAOS 

0ISPFQ8 

DISPFLT 

OISPACO 

OISPPAF 

OISPPRO 

OISPAQO 

OISPASQ 

OISPACw 

CALLS! 

OUTCI. 

OISOFMF 

CALLS! 

OUTCI. 

OISOOAY 

OISPAQO 

OISPACO 

OlSPOfiO 

CALLS! 

OUTCI. 

OISPFLT 

CALLS! 

OUTCI. 

0ISPPY8 

CALLS! 

OUTCI. 

0ISPOY8 

CALLS! 

OUTCI. 


CALLS! 

OUTCI . 


CALLS! 

ENTPYP 

EXITS 


CALLS! 

ENT9YP 

PELEASF 


PA3E  ll 

DtSPDAT 


CALLED  3Y! 

maqem 


called  3YI 

DISPOAT 


CALLED  9Yt 

OISPFMF 

OISPDAT 


called  by i 

OISPFDB 


CALLED  BY! 

DISPOAT 


CALLED  9Y! 

dispflt 


CALLED  3YI 

DISPFLT 

DISPOAT 

CALLED  9YI 

OISPPAy 

DISPPAF 

CALLED  3Y1 

SECANT 


CALLED  9Y! 

SELECT 

CALLED  BY! 

UOPUCIT 
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EXITS 

55.  ENGAGE 


56.  ENTRYP  CALLS! 

MESAGE 

RITEI 

RECER 

TAPES* 

OUTCI . 

ROUTER 

ITRAP 

SECOND 


PAGE  12 


CALLED  3 Y ! 

SELECT 

CALLEO  3Y  1 

LTRMRG 

UNPACK 

UOLLOAO 

UNSNAP 

TXY2HXL 

TXY2MX 

TTIME 

TLL2HX 

TNX2XY 

THTRPLN 

TNH2PS 

T3TLIST 

TGTGONE 

SRCMPL 

SNAP 

SENANT 

SELECT 

SCHTA8 

SCHEDUL 

RLKAVE 

RLTGTYP 

RuTGTAK 

RLRAI  •> 

rlfma’.t 

RLCORD 

RLA80B 

REVISE 

RENDEVU 

RELIST 

RELEASE 

PTPEE 

PLANOUT 

PLAN 

PELADD 

PACK 

OUTA 

OTHROAT 

OPTPTH 

NOPUCIT 

LTREE 

L3AOPL 

LINEX 

KOMPARE 

JUGGLE 

JTJ 

JGESUIT 
INITAC3 
INTT 
I  J2HX 
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pase 


13 


HKOSTS 

hold 

HL'TRNT 

history 

hExmult 

HEXMlT 

HEX INV 

HEXCHZ 

hexaoo 

OIHHE 

SCTPTRS 

QETHEX 

FSINIT 

FSOUMP 

FORMTGT 

FLTGEOH 

FINOFLT 

FTN08LK 

FETCH 

OROP0LK 

ohsoec 

DELADO 

CRFLTML 

CREATE 

CORBOUN 

CONTROL 

COOE05 

C30E03 

COOE01 

CLOSCOR 

CENTER 

CANOTGT 

availbl 

AOOBlOK 

AOASAS5 

ACFRAO 

ABVSCOR 

A8QUEUE 

MAOEH 


5T.  ENTSTAT 

CALLS! 

CALLED  BY! 

TAPE6P 

HALT 

OUTCI. 

FSOUHP 

SB.  EOF 

CALLED  3Y I 

OBSREAO 

CARO 

59.  ERROR 

CALLS! 

CALLEO  BY! 

TAPE6# 

LRKPRS 

OUTCI. 

60.  EXITP 

CALLS! 

CALLED  BYI 

SECONO 

LTRmrO 

MESA3E 

UNPACK 
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PAGE  1* 


RITE! 

UOLLOAO 

RECER 

UNSNAP 

TAPES# 

TXY2HXL 

OUTCI. 

TXY2HX 

ITRAP 

TTIHE 

ICHCCK 

TLL2HX 

THX2XY 

THTRPLN 

THH2PS 

TGTLIST 

TGTGONE 

srchpl 

SNAP 

SENANT 

SELECT 

SCHTAB 

SCHEOUL 

rlnave 

rltgtyp 

rltgtak 

RLRAIO 

RLFHAKT 

RLCORD 

RLAB08 

REVISE 

RCNOEVU 

RELIST 

RELEASE 

PTREE 

PLANOUT 

PLAN 

PELAOO 

PACK 

OUTA 

OTHRDAT 

optpth 

nOvUCIT 

ltree 

loadpl 

linex 

KOMPARE 

JUGGLE 

JTJ 

JGCSUIT 

INITACO 

INIT 

I  J2HX 

HXOGTS 

HOLD 

hltpnt 

HISTORY 

MEXMULT 

hexmlt 

hexinv 

HEXCHZ 


332 


PAGE 


HEXAOD 

GINME 

GETPTRS 

GETHEX 

FSINIT 

FSDUMP 

FORMTGT 

FLTGEOM 

FTNOFLT 

FTN08L* 

FETCH 

DR0P9LK 

DNSDEC 

DELADO 

CRFLTML 

CREATE 

COR80UN 

CONTROL 

COOE05 

COOE03 

COOEOl 

CLOSCOR 

CENTER 

CANOTGT 

AVAlLSL 

A0Q8L0K 

AO AS ASS 

ACFRAG 

A3VSCOR 

AaaueuE 

MAOEM 


61.  EXTSCN 


CALLS  * 


CHRGEN 

ITOJ. 


called  art 

LEXAN 


62.  FELOEL 


63.  FETCH  CALLS! 

ENTRYP 
INP8I. 
EX  l  TP 


called  3Y l 

SELECT 


CALLED  8Y! 

HAOEM 


64.  FINO0LA  CALLS! 

ENTRYP 

ROUTER 

MESA3E 

RITCI 

CLIST 

EXITS 


CALLED  a Y ! 

THTRPLN 

T3TLIST 

SEnanT 

othrdat 

NORUCIT 

FORHTGT 

FINOFLT 

COOEOS 

CANOTGT 

AOASASS 
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A9QUEUE 


PA3E  16 


65.  FjnOFLT  CALLS!  CALLED 


entryp 

HEX01ST 

FIN08LK 

KOMPARE 

GIMME 

4009L0K 

EXITP 

66.  FLTGEOM 

CALLS* 

ENTRY? 

MEXCMZ 

TMM2RS 

4T4M2. 

EXIT? 

CALLED 

67.  FLY 

called 

68.  FORMTsT 

CALLS! 

ENTRY? 

gimme 

FIN08LK 

finoflt 

RELEASE 

EXIT» 

called 

69.  FSDUMO 

CALLS* 

ENTRYP 

TRACE 

ENTSTAT 

CLIST 

RITCR 

lnplot 

lcmloc 

TAPE6* 

OUTCI. 

OUTCR. 

EXIT? 

called 

70.  FSINIT 

CALLS* 

ENTRYP 

EXIT? 

called 

71.  GFTHEX 

CALLS! 

ENTRYP 

MXDGTS 

MCS4GE 

RITE! 

gimme 

SCHTAB 

EXITS 

called 

9  Y  I 

FORMTGT 


9Y  I 

ACFRAG 


BYl 

SELECT 

9Y  I 

CANOTGT 


3Yt 

JTJ 


BY  I 

M40EM 


BY! 

TXY2HXL 

SEMANT 

SCMEDUL 

NOMUCIT 

mEXCHZ 

C00E18 

COOE05 
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72.  GETPTRS 


CALLS  I 

ENTRYP 

EXITP 


CALLED  9Y  I 

PLAN 


T3.  GIMME  CALLS* 

ENTRY!' 
HALT 
ME SAGE 
RITEI 
RITEP 
EXIT  P 


CALLED  3Y I 

UOLLOAO 

TSTLIST 

TSTGONE 

SEMANT 

REVISE 

RELEASE 

PELAOD 

OTHROAT 

OPTPTH 

NOKUCIT 

I vi taco 
i  vit 

GETHEX 

FORMTGT 

FIVOFLT 

OELAOO 

CRFLTML 

CREATE 

C3R0OUN 

COOE1B 

COOEOl 

CAVOTGT 

AOASASS 

ACFRAG 

A3VSCOR 

A3QUEUE 


76.  HALT 


7$.  HEX ADO 


CALLS! 


CALLED  8 Y 1 


CALLS! 


HOLO 

unpack 

OUTCI. 

ITRAP 

RITER 

RECCON 

RITEI 

select 

TRACE 

RELEASE 

RECER 

PACK 

ENTSTAT 

OTHROAT 

CLIST 

hltpnt 

PAGE 

5IMME 

AOUMP 

MAOEM 

ISOUMP 

enofil. 

STO». 

CALLED  8Y I 

ENTRYP 

SCHEDUL 

ITOJ. 

VOvUCIT 

EXITP 

HEXMLT 

HEXCHZ 

76.  HCXCHI 


CALLS! 


CALLED  8 Y I 


entryp 

TRACE 

MESASE 

R1TEP 

CL1ST 

HEXADO 

HEXINV 

SETHEX 

EXITP 

T7.  HEXOIST 


78.  HEXINV  CALLSI 

ENTR  ,'P 

ITOJ. 

EXITP 

79.  HEXMLT  CALLSI 

HEXAOO 

ENTRYP 

HX0ST5 

MESASE 

RITE! 

EXITP 

80.  HEXMULT  CALLSI 

ENTRYP 

ITOJ. 

EXITP 

81.  HISTORY  CALLS! 

ENTRYP 
MESASE 
MASKER 
TAPES* 
OUTCI . 
EXITP 

82.  HLTPNT  CALLSI 

EnTryp 

SECONO 

HALT 

EXIT* 

83.  HOLD  CALLS! 

ENTRYP 

0UT8I. 

REMINO. 

EXITP 


PASE  18 

QPTPTH 

FLTGEOM 


CALLED  8Y  I 

SCHEDUL 

FINOFLT 

CORBOUN 

CLOSCOR 

ACFRAG 

CALLED  BY  I 

hEXChZ 


CALLED  8YI 

IJ2HX 


CALLED  3 Y I 

NOMUCIT 


CALLED  3 Y I 

crfltml 

COOE18 

C30E05 


CALLED  3YI 

CONTROL 


CALLED  3YI 

HALT 
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8*.  HXOGTS 


CALLS! 


CALLED  3Y! 


ENTPYP 
ex  I  TP 

TH2HX 

THX2XY 

hexmlt 

gethex 

85.  HXMLT2 

CALLSI 

TH2HX 

I J2HX 

86.  I CHECK 

CALLS! 

OUTCI. 

CALLED  BY! 

EXITP 

87.  I J2HX 

CALLSI 

mexmlt 

ENTRYP 

ITOJ. 

EX  I  TP 

CALLED  BY ! 

TXY2HXL 

TLL2HX 

HXMLT2 

88.  1MT 

CALLSI 

ENTPYP 

XTOl. 

GIMME 

RITEP 

SNAP 

EXITP 

CALLED  BY! 

MADEM 

89.  I M I T  ACQ 

CALLS! 

ENTPYP 

GIMME 

AOOBLOK 

ALOG. 

MESAGE 

RITEI 

XTOI, 

NOKUCIT 

EXITP 

CALLED  BY! 

COOE05 

90.  IP JL 

CALLS! 

LCMLOC 

ISMIFT 

TAPE6A 

OUTCI. 

91.  ISOUHP 

CALLS! 

OUTCI. 

OU  TCP  . 

CALLED  BY! 

halt 

UNPACK 

PACK 

92.  I  SHIFT 

CALLED  BY! 

APCEL2 

LACELL 

APCEL1 

ROCELL 
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A00CHR 

LOOKUP 

LRKPRS 

LEXAN 

9TREE 

JTJ 

IBJL 


93.  I  TRAP  CALLS) 

HALT 


9*.  JGESUTT  CALLS) 

ENTRYP 
THX2XY 
ATAM2. 
EX  I  TP 


called  9y> 

EXITP 

ENTRYP 

THTRPLN 


CALLED  9Y) 

CANDTGT 


95.  JTJ  CALLS) 

ENTRYP 

mESAGE 

RITE! 

ISHIET 

TAPES# 

OUT  Cl. 

FSOUHP 

STOP. 

EXITP 


96.  JUGGLE  CALLS) 

ENTRYP 

EXITP 

97.  KQMPARE  CALLS) 

ENTRYP 

UNPACK 

PACK 

EXIT® 

98.  LACELI.  CALLS) 

ISMIET 

TAPE6# 

OUTCI. 


99.  LCMLOC 


CALLED  9Y ) 

THX2XY 


CALLED  9Y> 

thtrpln 

EINOFLT 


CALLED  8v • 

LRkPRS 


called  9Y ) 

UNPACK 

RITEP 

PACK 

IPJL 

ESOUMP 

RAOEM 


CALLS) 


CALLED  SY) 


100.  LPXAN 


CHRGEN 


NXTSYM 


PASS  21 


ISHJFT 

S0T0ER. 

AOOCHR 

LOOKUP 

EXTSCN 

TAPE6* 

OUTCI. 


101.  LINEX 

CALLS  1 

ENTRYP 

EXIT® 

CALLED  9Y 1 

OPTPTH 

CORBOUN 

102.  LNPLOT 

CALLS  1 

TAPES* 

OUTCI. 

CALLED  BY  1 

CLIST2 

SENANT 

OUTPTRS 

FSOUMP 

CODE  1 B 

COOEOS 

COOE03 

CLIST 

103.  LOAOPL 

CALLSI 

ENTRYP 

EXIT® 

CALLED  BY  I 

CDOE03 

10<>.  LOOKUP 

CALLSI 

ISHIXT 

TAPES* 

OUTCI. 

called  byi 

LEXAn 

105.  LRXBRS 

CALLSI 

SEMANT 

TAPES* 

OUTCI. 

ROCELL 

nxtsym 

ERROR 

ISHIET 

APCEL1 

APCEL2 

LACELL 

called  BY! 

HAOEM 

106.  LTREE 

CALLSI 

ENTRYP 

RELEASE 

LTRMRG 

EXIT® 

CALLED  8YI 

control 

107.  LT9MR8 

CALLSI 

ENTRYP 

EXIT® 

called  9Y 1 

LTREE 

OELADO 

108.  NAOE* 

CALLSI 

OINTRY. 
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P»3E  22 

RECCON 

ENTRYP 

INPFI. 

DBGRE  AD 

RECQVR 

GOTOER. 

FETCH 

PAGE 

LCMLOC 

FSINIT 

OTHROAT 

OISPOAT 

HALT 

IN  I T 

LRK9RS 

RELIST 

DELAOO 

CONTROL 

EX  I  TP 

END. 


109.  MASKER 


110.  MESAGE 


calls  < 

Tapes# 

outci. 


111.  NAY80R 


CALLED  9YI 

HISTORY 

CALLED  9Y : 

CLIST2 

EXITP 

ENTRYP 

SELECT 

RELEASE 

PACK 

OUTPTRS 

JTJ 

INITACO 

HISTORY 

HEXMLT 

HEXCHZ 

gimme 

GETHEX 

FIND8LK 

DEL ADD 

CLI5T 

CALLED  3YI 

SELECT 


U2.  NOMUCTT  CALLS!  CALLED  BY! 

ENTRYP  INITAC3 

HEXADO 

HEXMULT 

GETHEX 

GIMME 

AD08L0K 

FIN08LK 

OROPBLK 
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PAGE 


23 


RELEASE 

EX1TP 

113.  NXIivJ 

CAULS  1 

LEXAN 

tapes* 

ourct. 

CALLEO  9 Y 1 

lrkprs 

114.  OOTPTm 

CALLS! 

ENTRY® 

GIMME 

THH2PS 

MEXCH2 

LINEX 

EXIT® 

CALLED  9 Y 1 

COR0OUN 

ACPRAG 

115.  OTmSOaT 

CALLS! 

ENTRYP 

GIMME 

INPCI . 

TAPES# 

OUTCI. 

R1TEP 

A008L0K 

INPEI. 

PIN08LK 

HALT 

EXITP 

CALLED  BY! 

maoem 

115.  OUT* 

CALLS! 

ENTPYP 

TAPES# 

OUTCI. 

EXITP 

117.  OuTPTPS 

CALLS* 

LNPLOT 

MESAGE 

RITEI 

BITER 

BITEP 

UNPACK 

119.  pack 

CALLS! 

ENTPYP 

LCMLOC 

PAGE 

MESAGE 

BITEI 

TRACE 

ROUTER 

RITEP 

ISO'JMP 

MALT 

EXITP 

CALLED  8Y» 

SEMANT 

KOMPARE 

C0DE18 
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PA3E  ?* 


ll'*.  PAGE  CALLS!  CALLED 

TAPES# 

OUTCI. 


120.  PELAOO  CALLS!  CALLED 

ENTRYP 

GIHHE 

PTRMRG 


EXITP 

121.  PERCEPT 

CALLED  BY! 

SELECT 

122.  PLAN 

CALLS! 

entryp 

GETPTRS 

THTRPLN 

EXITP 

CALLED  BY! 

SELECT 

123.  Pi.ANOuT 

CALLS! 

ENTRYP 

OUTCI. 

EXITP 

CALLED  BY! 

THTRPLN 

12*.  PONOEo 

CALLED  BY! 

SELECT 

125.  PTREE 

CALLS! 

ENTRYP 

RELEASE 

I SH  TFT 

EXITP 

CALLED  BY! 

T3TGONE 

CANOTGT 

126.  PTRMRG 

CALLED  BY! 

PELADO 

1 2T  •  ROCELL' 

CALLS! 

ISMIFT 

TAPE6# 

OUTCI. 

CALLED  BY! 

lrkprs 

128.  PECCON 

CALLS! 

TAPE6# 

OUTCI. 

ADUMP 

HALT 

CALLED  BY! 

maoEn 

129.  RECER 

CALLS! 

TAPE6# 

OUTCI. 

OUTCP. 

CALLED  BY! 

halt 

EXITP 

ENTRYP 

BY  i 

CLIST2 

halt 

PACK 

CLIST 

maOEh 

by  I 

TGTLIST 

CANOTGT 

availbl 


342 


130. 

131. 


132. 

133. 

13*. 

135. 


recovr 


PLEASE  CALLS  I 

ENTRYP 

mesage 

RITEI 

RITES 

HALT 

GIMME 

EXITS 


PEL  I  ST  CALLS! 

ENTRyP 

RELEASE 

EXITS 

RENOEVU  CALLS! 

ENTRYP 

THX2XY 

TXY2HXL 

EXITS 

REVISE  CALLS! 

ENTRYP 

GIMME 

ABVSCCR 

RELEASE 

EXITP 

RlTEI  CALLS! 

T  APES* 
OUTCI • 


PA3E  25 

OSLADO 

CALLEO  9Y1 

MAOEM 

CALLED  9 Y I 

rlwave 

rltgtyp 

rltgtak 

RLRAID 

flLEMAKT 

RLCORO 

RLA80B 

REVISE 

RELIST 

pTrEE 

NOrUCIT 

ltree 

EORMTGT 

OROP0LX 

CONTROL 

AVAIL9L 

ACERAG 

CALLED  9yi 

MADEM 


CALLED  3y: 

SCMEDUL 


called  3Y : 

thtrpln 


called  9YI 

CLIST2 

HALT 

EXITP 

ENTRYP 

SEmanT 

select 

release 

PACK 

OUTPTRS 

JTJ 

INITACO 

HEXMLT 
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136. 


137. 


138. 


139. 


140. 


141. 


GIHME 

GETHEX 

EINQBLK 

COOE18 

cooeos 

CLIST 


RITEP  CALLS! 

LCMLOC 

TAPE6* 

OUTCI. 


PITER  CALLS! 

TAPES* 
OUTCI . 


RLA803  CALLS: 

ENTRYP 
RELEASE 
EX  I  TP 

RLCOPO  calls: 

ENTRYP 
RLA808 
RELEASE 
EX  I  TP 

Rlemakt  calls: 

ENTRYP 
RELEASE 
EX  I  TP 


9LRAI0  CALLS: 

ENTRYP 

RL*AVE 

RLCORO 

RELEASE 

EX  I  TP 


CALLED  3Yt 

CLIST2 

UNPACK 

SENANT 

RELEASE 

PACK 

OUTPTRS 

OTHROAT 

INIT 

HEXCHZ 

GINME 

C00E18 

COOEOS 

COOE0  3 

COOEOl 

CLIST 


CALLED  3Y I 

CLIST2 

HALT 

SEnant 

OUTPTRS 

F5DUMP 

CLIST 

CALLED  9Y  i 

RLCORO 


CALLED  8Y| 

RLRAIO 


CALLED  8Y : 

RLTGTAK 


called  3y : 

THTRPLN 


26 
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27 


1*2.  RLTGTAK 

calls: 

EnTRYP 

RLEKAKT 

release 

EX  1  TP 

called 

9y  : 

RLTGTYP 

1*3.  RLTGTyP 

calls: 

ENTRYP 

RELEASE 

RLTGTAK 

EX  I  TP 

CALLED 

3YI 

RLwAvE 

1**.  RL'XAVE 

calls: 

ENTRYP 

RLTGTYb 

RELEASE 

EXITS 

called 

9Y : 

RLRAID 

1*5.  ROUTER 

Calls: 

TAPE6* 

OUTCI . 

OUTCR. 

called 

9y  : 

ENTRYP 

BACK 

EInOBLK 

1*6.  SCHEDUL 

calls: 

ENTRYP 

UNPACK 

RANDOM. 

RENOEVU 

MEXAOO 

GETHEX 

HEXOIST 

ACER AG 

EX  I  TP 

called 

8Y  : 

TMTRPLN 

1*7.  SCHTA3 

calls: 

ENTRYP 

EXITS 

called 

9y: 

GETHEX 

1*8.  SECGNO 

CALLED 

9YI 

EX  I  TP 
ENTRYP 
HLTPNT 
CONTROL 

UR.  SELECT 

CALLS! 

EnTRYP 

called 

9y  : 

CONTROL 

GCTOER. 

ME5A3E 

ritei 

HALT 

EELOEL 

ASSIGN 

ATTACK 

C0**«3 
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PASS  28 


oogfite 

engage 

FLY 

NAyBOR 

percept 

PLAN 

PONOER 

TOWER 

UMPIRE 

TAPE6* 

OUTCI. 

OUTCR. 

EX  I  TP 


150.  SECANT  CALLS!  CALLED  BY I 

ENTRYP  LRKPRS 

GOTOEP. 

COOEOt 

GImmE 

PACK 

RITEI 

RITEO 

LNPLOT 
COOE03 
GETMEX 
COOE05 
OMSDEC 
TLL2HX 
INPCI . 

INPCR. 

TAPES* 

OUTCI. 

OUTCR. 

AOOBLOK 

TTIME 

RITER 

F I NOBLK 

cooeis 

XTOI  • 

SRCHBL 
EX  I  TP 


151.  SHUFFLE 

CALLED  BY l 

TH2HX 

152.  Snap 

C  ALLS  1 

CALLED  BY! 

ENTRYP 

I  N I  T 

EX  I  TP 

OELAOO 

CONTROL 

153.  SRChpl 

CALLS! 

CALLED  BY  1 

ENTRYP 

SEMANT 

CREATE 

C00E05 

EXJTP 

COOE03 
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15*.  TsTGOvE 


155.  TGTLIST 


156.  TMH2PS 


157.  ThTRPln 


CALLS  t 


ENTRYP 
pTREE 
GIMME 
EX  I  TP 


CALLSl 


ENTRYP 

FIN08LK 

GIMME 

AOD8LOK 

PELiOO 

EXITP 


CALLSl 


EnTryp 

THX2XY 

EXITP 


CALLSl 


ENTRYP 

C0R8OUN 

REVISE 

FIN08LK 

KOMPARE 

CANOTGT 

ITRAP 

AVAIL8L 

SCHEOUL 

OELAOO 

planout 
SLR  A 10 
EXITP 


CALLED  3Y 1 


CASOTGT 


CALLED  3y  I 


CD0E18 

C30E05 


CALLED  3Y! 


DPTPTH 

FLTGEOM 

CDR80UN 


CALLED  3yi 


PLAN 


PAGE  29 


158.  THX2XY 


159.  TH2HX 


CALLSl 


ENTRYP 

MXOGTS 

JUGGLE 

EXITP 


CALLSl 


HXDGTS 

SHUFFLE 


CALLED  8 Y I 


TMM2PS 

RENDEVU 

JGESUIT 


CALLED  3Y I 


MXMLT2 


160.  TLL2HX 


161.  TLL2XY 


CALLSl 


ENTRYP 

SIN. 

TAN. 

TXY2MX 

CENTER 

I  J2HX 

EXITP 


CALLSl 


CALLED  3YI 


SEMANT 
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162. 

163. 

164. 

165. 

1 66  . 

167. 

166. 

169. 

170. 

171. 

172. 


PA3E  30 

SIN. 

TAN. 


to#er 

CALLED  3YI 

select 

TRACE 

CALLS  1 

TRPRRT 

TRPRMT 

TRPRNT 

called  BY! 

HALT 

pack 

hexchz 

rsouMP 

OELAOO 

TRPRMT 

CALLED  BY  1 

TRACE 

TRPRNT 

CALLSI 

TAPES# 

OUTCI. 

called  by i 

TRACE 

TRPRRT 

CALLED  Byj 

TRACE 

TTtME 

CALLS  1 

ENTRYP 

EX  I  TP 

CALLED  9y l 

SEmant 

TXY2MX 

CALLSI 

ENTRYP 

EXITP 

CALLED  By  1 

TLL2HX 

TXY2HXL 

CALLSI 

ENTRYP 

COS. 

SIN. 

X  TO  l  . 

CENTER 

IJ2NX 

3ETMEX 

EXITP 

called  byi 

RENOEVU 

cdrboun 

TXY2LI.' 

CALLSI 

ASIN. 

ATAN. 

UMPIRE 

called  BYI 

SELECT 

ONPACY 

CALLSI 

ENTRYP 

LCMLOC 

RITEP 

ISOUMP 

MALT 

EXITP 

CALLED  Byi 

SCMEDUL 

OJTPTRS 

kompare 

C00E18 
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173. 

UmSnao 

C4U.S  1 

ENTRYP 

EXITP 

CALLED 

3  r : 

CONTROL 

174. 

UOLlG AO 

CALLS! 

ENTRTP 

GIMME 

AOOSLOK 

exrrp 

CALLED 

9YJ 

C00E18 

COOEOS 

175.  HIPEOuT 

176.  XSHIFT 
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PA3E 


1. 

ALOG. 

called 

an 

imitaco 

2. 

ASIN. 

called 

ar> 

TXY2LL 

3. 

ATAN2. 

called 

3Y 1 

JGESUIT 

FLTGEOm 

4. 

ATAN. 

calleo 

BY  1 

TXY2LL 

5. 

cos. 

called 

BY  1 

TXY2HXL 

CORBOUn 

6  • 

oecoor. 

called 

3YI 

08GREA0 

7. 

ENOFIl. 

called 

BY  1 

HALT 

a. 

END  . 

called 

By  i 

MADE* 

9. 

30T0ER. 

called 

BY  I 

LEXAN 

SEMANT 

SELECT 

ADASAS5 

maoem 

10. 

Imps I. 

called 

by  • 

FETCH 

11. 

IMPCI. 

called 

BY  I 

D3GREA0 

CARD 

SEmanT 

OTHROAT 

12. 

INPCR. 

called 

BY  I 

SEMANT 

13. 

INPFI. 

called 

BY  1 

OTHROAT 

HADEM 

14. 

ITOJ. 

called 

3Y» 

EXTSCN 

32 
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P»3E  33 


IJ2MX 

HEXMULT 

HEXINV 

HEXAOO 

05TSHX 


15.  0UT8I. 


CALLED  3r  I 

HOLD 


16.  OUTCI.  CALLED  8YI 

CLIST2 

ISOUMP 

HALT 

AOUMP 

08GPEAD 

I  CHECK 

oiSPPre 

OISPPRO 

oisppay 

DISPPAF 

OISPFHF 

OISPFLT 

01SPFD9 

DISPAOO 

OISPADS 

OISPACP 

OISPACL 

OISPACO 

DI5PA80 

OISPOAT 

EXITP 

ENTRYP 

ENTSTAT 

POUTER 

PECER 

RECCON 

HXT5YH 

APCEL2 

lacell 

apceu 

ROCELL 

CARD 

CHRGEN 

ERROR 

AOOCMR 

lookup 

lrkprs 

lexan 

TRPRNT 

SEHANT 

SELECT 

PITER 

RITEP 

RITEI 

BLANOUT 
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®A3E  3* 


BASE 

OUTA 

OThROAT 

MESAGE 

L9PL0T 

JTJ 

I°JL 

HISTORY 

FSDUMP 

CLIST 


17.  OUTCR.  CALLED  9Y 1 

CLIST2 

ISOUMP 

AOUMP 

ROOTER 

RECER 

SEWANT 

select 

FSOUMP 

CLIST 


18.  31NTRY. 


CALLED  8YI 

naOEM 


19.  RANOOH. 


CALLED  8Y : 


SCHEOUL 

CANDTGT 


20.  REWIND. 

called 

9YI 

hold 

21.  SIN. 

called 

9YI 

TXY2HXL 

TLL2XY 

TLL2HX 

CORBOUN 

22.  STOP. 

called 

9YI 

halt 

JTJ 

23.  tan. 

called 

8YI 

TLL2XY 

TLL2HX 

2*.  TAPES# 

called 

art 

CLIST2 

EXITP 

ENTRYP 

ENTSTAT 

ROUTER 

RECER 

RECCON 

NXTSYM 
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25. 


PA3E  35 

A»CEL2 

LACELL 

APCEL1 

ROCELL 

CARO 

CHRGEN 

ERROR 

AOOCHR 

lookup 

LRKPRS 

LEXAN 

trprnt 

SERANT 

SELECT 

RITER 

RXTEP 

RITEI 

PAGE 

OUTA 

OTMROAT 

HESAGE 

LRPLOT 

JTJ 

I P  JL 

HISTORY 

PSOUMP 

CLIST 


XTOI.  CALLED  by: 

TXYHHXL 

SEHANT 

IRITACQ 

ZRIT 
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XA0EM  SU8R0UTI n£  CALLING  HIERARCHY 
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00001 

1.  MADEN 

00002 

2. 

OINTRY. 

00003 

2. 

RECCON 

0000* 

3. 

TAPE6# 

00005 

3. 

OUTCI . 

00006 

3. 

AOUMP 

00007 

*.  OUTCI. 

00008 

*.  outcr. 

00009 

3. 

HALT 

00010 

*.  HOLO 

00011 

5.  ENTRYP 

00012 

6.  HESAGE 

00013 

7.  TAPES* 

0001* 

7.  OUTCI. 

00015 

6.  RITEI 

00016 

7.  TAPES* 

00017 

7.  OUTCI. 

00018 

6.  RECER 

00019 

7.  TAPES* 

00020 

7.  OUTCI. 

00021 

7.  OUTCR. 

00022 

6.  TAPE6* 

00023 

6.  OUTCI. 

0002* 

6.  ROUTER 

00025 

7.  TAPES* 

00026 

7.  OUTCI. 

00027 

7.  OUTCR. 

00028 

6.  ITBAP 

00029 

7.  HALT 

00030 

6.  SECONO 

00031 

5.  0UT8I. 

00032 

5.  REWINO. 

00033 

5.  EXITP 

0003* 

6.  SECONO 

00035 

6.  HESASE 

00036 

6.  RITEI 

00037 

6.  RECER 

00038 

6.  TAPES* 

00039 

6.  OUTCI. 

000*0 

6.  ITRAP 

000*1 

6.  ICHECK 

000*2 

7.  OUTCI. 

000*3 

*.  OUTCI. 

000** 

*.  RITER 

000*5 

5.  TAPES# 

000*6 

5.  OUTCI. 

000*7 

♦.  RITEI  (SEE 

000*8 

*.  TRACE 

000*9 

5.  TRPRRT 

00050 

5.  TRPRMT 

00051 

5..  TRPRNT 

00052 

6.  TAPE6# 

(SEE  LINE  00009) 


(SEE  LINE  00012) 
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00*99 

00500 

00501 

00502 

00503 

0050* 

00505 

00506 

00507 

00508 

00509 

00510 

00511 

00512 

00513 

0051* 

00515 

00516 

00517 

00518 

00519 

00520 

00521 

00522 

0C523 

0052* 

00525 

00526 

00527 

00528 

00529 

00530 

00531 

00532 

00533 

0053* 

00535 

00536 

OOS37 

00538 

00539 

005*0 

005*1 

005*2 

005*3 

005** 

005*5 

005*6 

005*7 


R*3£  *5 

8.  ENTRY*  (SEE  CINE  000  l  1 1 

8.  QHM£i  (SEE  LINE  001121 

8.  TNH2*s  (SEE  LINE  00*67) 

8.  hEXChZ 

9.  ENTRYP  1  SEE  LINE  00011) 

9.  T9 ACE  (SEE  LINE  000*8) 

9.  NESAGE  (SEE  LINE  000121 

9,  RITEP  (SEE  LINE  00366) 

9.  CLJST  (SEE  LINE  00058) 

9.  HEXA00  (SEE  LINE  00291, 

9.  HEX INV 

10.  ENTRYP  (SEE  LINE  00011) 

io.  iroj. 

10.  EX  I  TP  (SEE  LINE  00033) 

9.  GEThEx  (SEE  LINE  002**1 

9.  EXTTP  (SEE  LINE  00033) 

a.  LINEX  (SEE  LINE  00*89) 

a.  EXIT*'  (SEE  LINE  00033) 

7.  EXIT*  (SEE  LINE  00033) 

6.  REVISE 

7.  ENTRY*  (SEE  LINE  00011) 

7.  OIhhE  (SEE  LINE  00112) 

7.  A8VSC0B 

8.  ENTRY*  (SEE  LINE  00011) 

a.  cvoscor 

9.  ENTRYP  (SEE  LINE  00011) 

9.  HCXDIST 

9.  EXITP  ( SEE  LINE  00033) 

8.  5INMP;  (SEE  LINE  00112) 

8,  *308l0<  (SEE  LINE  00123) 

8,  EXIT*  (SEE  LINE  00033) 

7.  PEL EASE  (SEE  LINE  00305) 

T.  EXIT*1  (SEE  LINE  00033) 

6.  FINOBLK  (SEE  LINE  00127) 

6,  COMPARE 

7.  Entry*  (SEE  lIne  oooil) 

7.  UNPACK  (SEE  LINE  00365) 

7.  PACK  (SEE  LINE  00189) 

7.  EXIT*  (SEE  LINE  00033) 

6.  cANorsr 

7.  ENTRY*  (SEE  LINE  00011) 

7.  FIN05UX  (SEE  LINE  00127) 

7.  CL0SC3R  (SEE  LINE  00517) 

7.  JOES JIT 

8,  ENTRY®  (SEE  LINE  OOOUI 

8.  TNX2XY  (SEE  LINE  00*69) 

8.  ATAN2. 

8.  EX C  r*'  (SEE  LINE  00033) 

t.  roRnrsr 

3.  ENTRYR  (SEE  line  oqovd 

8.  3 1  SHE’  (SEE  LINE  001121 

a.  EIV08LX  (SEE  LINE  00127) 

8.  EINDXLT 

9.  ENTRYR  (SEE  LINE  00011) 

9.  HEXOIST 
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00548 

9.  fIM08L< 

(SEE  LINE  00127) 

00549 

9.  OM»ARE 

(SEE  LINE  00527 ) 

00550 

9.  SIMhE 

(SEE  LINE  00112) 

00551 

9.  A30BL0M 

(SEE  LINE  00123) 

00552 

9.  EXITP 

(SEE  LINE  00033) 

00553 

8.  RELEASE 

(SEE  LINE  00305) 

00554 

8.  EXIT31 

(SEE  LINE  00033) 

00555 

7.  SIMMS 

(SEE  LINE  00112) 

00556 

7.  A00BL0K 

(SEE  LINE  00123) 

00557 

7.  TGTG3NE 

00558 

8.  ENTRY* 

(SEE  LINE  00011) 

00559 

8.  PTREEl 

00560 

9.  ENTRY* 

(SEE  LINE  00011) 

00561 

9.  RELEASE 

(SEE  LINE  00305) 

00562 

9.  I  SHIFT 

00563 

9.  EXITP 

(SEE  LINE  00033) 

00564 

8.  SIMMS 

(SEE  LINE  00112) 

00565 

8.  E*IT3i 

(SEE  LINE  00033) 

00566 

7.  PTRES 

(SEE  LINE  00559) 

00567 

7.  RANDOM. 

00568 

7.  PELAOO 

(SEE  LINE  00275) 

00569 

7.  EXIT*' 

(SEE  LINE  00033) 

00570 

6. 

ITRAP  (SEE 

LtNE  00028) 

00571 

6. 

AWAIL8L 

00572 

7.  ENTRY* 

(SEE  LINE  00011  ) 

00573 

7.  PELAOO 

(SEE  LINE  00275) 

00574 

7.  RELEASE 

(SEE  LINE  00305) 

00575 

7.  EXIT* 

(SEE  LINE  00033) 

00576 

6. 

SCMEOUl 

00577 

7.  ENTRY®’ 

(SEE  LINE  00011) 

00578 

7.  UNRaCM 

(SEE  LINE  00365) 

00579 

7.  RANDOM. 

00580 

7.  RENDCVU 

00581 

8.  ENTRY® 

(SEE  LINE  00011) 

00582 

8.  TMX2XY 

(SEE  LINE  00469) 

00583 

8.  TXY2MXL 

(SEE  LINE  00477) 

00584 

8.  EXIT®' 

(SEE  LINE  00033) 

00585 

7.  HEXAOO 

(SEE  LINE  00291) 

00586 

7.  SEThEX 

(SEE  LINE  00244) 

00587 

7.  HEXOIST 

00588 

7.  ACFRA3 

00589 

8.  ENTRY® 

(SEE  LINE  00011) 

00590 

8.  SIMMS’ 

(SEE  LINE  00112) 

00591 

8.  CRElTMl 

00592 

9.  Entry® 

(SEE  LINE  00011) 

00593 

9.  CREATE 

(SEE  LINE  00208) 

00594 

9.  SImmE 

(SEE  LINE  00112) 

00595 

9.  AOOBLOM 

(SEE  LINE  00123) 

00596 

9.  HISTORY 

(SEE  LINE  00317) 

00597 

9.  EXITP 

(SEE  LINE  00033) 

00598 

8.  A  008LO< 

(SEE  LINE  00123) 

00599 

9.  0»TPTH 

(SEE  LINE  00492) 

00600 

8.  RELEASE 

(SEE  LINE  00305) 

00601 

8.  FL'TSSOM 

00602 

9.  EnTRYP 

(SEE  LINE  0001  1  ) 

®43E 
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00603 

00604 

0060S 

00606 

00607 

00606 

00609 

00610 

00611 

00612 

00613 

00614 

00615 

00616 

00617 

00618 

00619 

00620 

00621 

00622 

00623 

00624 

00625 

00626 

00627 

00628 

00629 

00630 

00631 

00632 

00633 

006J4 

00635 

00636 

00637 

00638 

00639 

00640 

00641 

00642 

00643 

00644 

00645 

00646 

00647 

00648 

00649 

00650 

00651 

00652 

00653 

00654 

00655 

00656 

00657 


°A3E 

(SEE  LINE  00496) 

(SEE  LINE  00467) 

(SEE  LINE  00033) 

(SEE  LINE  00230) 

(SEE  LINE  00033) 

(SEE  LINE  00033) 

(SEE  LINE  00230) 

(SEE  LINE  00011) 

(SEE  LINE  00033) 

(SEE  LINE  00011) 

(SEE  LINE  00011) 

00011) 

00305) 

(SEE  LINE  00011) 

(SEE  LINE  00011) 
(SEE  LINE  00305) 
(SEE  LINE  00033) 
(SEE  LINE  00305) 

(SEE  LINE  00033) 

(SEE  LINE  00033) 

(SEE  LINE  00305) 

(SEE  LINE  00033) 

(SEE  LINE  00011) 


9.  MEXCHZ 
9.  T  NH2PS 
9.  A  T  AN2 • 

9.  EXITP 
8.  HEXOtSt 
8.  0ELA30 
8.  EXtT°i 
7  •  EXIT* 

6.  DELAOD 
6.  PLANOUT 
7.  entry0 
7.  OUTCI. 

7.  EXIT0' 

6.  RLRAJO 
7.  ENTRY0 
7.  RL*AVS 
8.  ENTRYP 
8.  RLT3TYP 

9.  Entry0  (see  line 

9.  RELEASE  (SEE  LINE 

9.  RlT3TA< 

10.  ENTRYP 
10.  RLFNAKT 
11.  ENTRYP 
11.  RELEASE 
11.  EXITP 

10.  release 

10.  EXITP 
9.  ExITP 
8.  RELEASE 
8.  EXITP' 

7.  rlcoro 
8.  ENTRyP' 

8.  RLA833 
9.  ENTRYP 
9.  RELEASE 
9.  ExITP 
RELEASE 
EXITP' 


3. 

3. 


6. 

5.  EXITP 
4.  PONDER 
4.  T04ER 
UMPIRE 
TA°E6* 
OUTCI. 
3UTCR. 
EXIT# 
Snap 
UNSNAP 
4.  ENTRY0 
4.  EXIT° 
RELEASE 


(SEE  LINE  00011) 
(SEE  LINE  00305) 
(SEE  LINE  00033) 
8.  RELEASE  (SEE  LINE  00305) 

8.  EXITP'  (SEE  LINE  00033) 

7.  RELEASE  (SEE  LINE  0030S) 

7.  EXIT0’  (SEE  LINE  00033) 

EXITP  (SEE  LINE  00033) 


4. 

4. 

4. 

4. 

4. 


(SEE  LINE  00033) 


(SEE  LINE  00033) 
(SEE  UnE  00175) 

(SEE  LINE  00011) 
(SEE  LINE  00033) 
(SEE  LINE  00305) 
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00658 

3.  SECONO 

00659 

3.  HLTbnT 

00660 

4.  FNTSVP 

(SEE  LINE  00011) 

00661 

4.  SECOND 

00662 

4.  HALT 

(SEE  LINE  00009) 

00663 

4.  EXITS 

(SEE  LINE  00033) 

00666 

3.  EXITS 

(SEE  LINE  00033) 

00665 

2.  EXITS 

(SEE  LINE  00033) 

00666 

2.  END. 
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Main  Processor 


CIST  OP  SUBROUTINES  -  *AD£«l 


PA3E 


1. 

A8SEE 

2. 

ABVSCOR 

3. 

A82CRC 

A. 

ACCEPT 

5. 

acfrag 

6. 

A008UOK 

7. 

ADUMO 

a. 

Ar»THNK 

9. 

ALL08AT 

10. 

ALLOFU 

11. 

ALLOOAT 

12. 

AMMOCHK 

13. 

ASSI5N 

1*. 

ATKASES 

15. 

attach 

I*. 

AUTOPRI 

1  7. 

AVAJL.8L 

18. 

AZ1LT6 

19. 

8AOMOVE 

20. 

8ATCEAS 

21. 

3ATTC0W 

22. 

8ATT0UT 

23. 

rlkoa  r 

2*. 

9NCM0PR 

2S. 

8NC0NM0 

26. 

8NC0VI.S 

27. 

9NC0NTC 

28. 

9NLAULE 

29. 

9HN0TR0 

30. 

BNNPTRK 

31. 

9NP0N8B 

32. 

9NP0980 

33. 

9NP0N0A 

36. 

BNPOMEP 

35. 

8NP0NFA 

36. 

BNPONFO 

37. 

BNPONSS 

38. 

8NREC0V 

39. 

80CTTNK 

60. 

8TNA5.IN 

61. 

9TN2CRC 

62. 

9TRYTNK 

63, 

8YAUC0V 

66, 

BYCMOPR 

65. 

BYCOSHO 

66. 

8YC0NLS 

67, 

BYCOnTC 

64. 

9YENQPS 

69. 

8YME0UP 

50. 

8YN0TR0 

51. 

8YNPTRK 

52. 

8YPASUP 
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53. 

3YPONER 

54. 

9YPONFO 

55. 

BYPONRL 

56. 

9YPONRS 

57. 

3YPONTM 

58. 

8VTKCMK 

59. 

9YUPOAT 

60. 

CANC4L0 

61. 

CANOTGT 

62. 

CENTER 

63. 

CFLYCRC 

64. 

CHKCOV 

65. 

CMKLAST 

66. 

CLIST 

67. 

CLIST2 

68. 

CLOSCOR 

69. 

CNACTTk 

70. 

COMMAND 

71. 

COMMO 

72. 

CONTROL 

73. 

C0R80UN 

74. 

COVAPLY 

75. 

CRCOTES 

76. 

CRCEVNT 

77. 

crcktl 

78. 

CRCL35S 

79. 

CRCSCE 

80. 

CRCTmnk 

81. 

crctrak 

82. 

CRC2TNT 

83. 

CREATE 

84. 

CRFLTML 

85. 

08GREAO 

86, 

oecralo 

87. 

OELAOD 

88. 

OESTROY 

89. 

DETECT 

90. 

OGTSHX 

91. 

OILOuT 

92. 

0ISP48O 

93. 

OtSPACO 

94. 

OISPACL 

95. 

OISPACR 

96. 

OISPaDS 

97. 

oispaqo 

98. 

OtSPOAT 

99. 

9ISPP0B 

100. 

01SPFLT 

102. 

.jTSPfmF 

102. 

OrSPOAF 

103. 

OISPOAY 

104. 

D1SPPRO 

105. 

01SPRY9 

106. 

OLYACT 

107. 

OOOF1TE 
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_ 

108. 

oogthnk 

109. 

oroprlk 

110. 

DROPOOS 

111. 

OROPPS2 

112. 

ENGAGE 

113. 

ENTRyP 

11*. 

entstat 

115. 

EOF 

116. 

EX  I  TP 

117. 

feldel 

V 

118. 

fetch 

*'v 

119. 

filerup 

120.  PJN03LK 

121.  FINOFLT 

122.  F I  NO  I T 

123.  FIRECH* 
12*.  FLITE 

125.  fltGEOm 

126.  FLTKyPE 

127.  FLY 

128.  FLYSEE 

129.  fORMTGT 

130.  FSDUYP 

131.  FSINtT 

132.  FUELCHK 

133.  GETHfiX 
13*.  GETPTRS 

135.  GIMME 

136.  GN0L30K 

137.  GOGETEm 

138.  GOTO ad 

139.  halt 
1*0.  hanOZPT 
1*1.  HEXAOO 
1*2.  HEXCHZ 
1*3.  HExOIST 
1**.  HEX  I NV 
1*5.  MEXMt_T 
1*6.  HEXMOVE 
1*7.  HEXMUI.T 
1*8.  HISTORY 
1*9.  HLTPNT 

1 E  0  •  HOLO 

151.  HXOGTS 

152.  HXMLT2 

153.  ICHECF 
15*.  IJ2HX 

155.  IN  I  T 

156.  InITaCO 

157.  INRANGE 

158.  INSECT 

159.  INSERT 

160.  INTASIN 

161.  INTFINO 

162.  INTRFI.Y 
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163.  INT2CSC 

164.  IPJL 

165.  ISOUMP 

166.  ISHIFT 

167.  ITRAP 

168.  jGESJIT 

169.  jtj 

170.  JUGGi.E 

171.  KlLfLlT 

172.  KOMPARE 

173.  LCMLOC 

174.  LINE* 

175.  INPLOT 

176.  LOAOPL 

177.  LOSRAOR 
179.  l^KPQS 
179.  lTREE 

190.  lTRMRG 

181.  maOEM 

182.  MASKER 

183.  mESAGE 

184.  mESBILO 

185.  NAY80R 

186.  nEwmovE 

187.  nEwPERC 

188.  NOMUCIT 

189.  MUKBi.NO 

190.  OPTPTM 

191.  OTHROAT 

192.  OUTA 

193.  OUTPTRS 

194.  RACK 

195.  RAGE 

196.  RATOEC 

197.  °EL AGO 

198.  PERCEPT 

199.  PLAN 

200.  PLANOUT 

201.  P0N0E9 

202.  PREPAFU 

203.  PRIORTY 

204.  RTPOmER 

205.  RTRAnO 

206.  RTREE 

207.  PTRMRG 

208.  REAOtL 

209.  RECCON- 

210.  RECER 

211.  RECOVP 

212.  REOERRF 

213.  RELEASE 

214.  RELIST 

215.  RELOAO 

216.  RELOCAT 

217.  RELSTLL 


LIST  OF  FORTRAN  LIBRARY  ROJTINES  -  <40 


I. 

4LOG. 

2  . 

A  S  I  N  • 

3. 

4  T  AN?. 

A. 

COS. 

5. 

oecooi . 

6  • 

enofil. 

7. 

End. 

a. 

SOTOER. 

9. 

INP8I . 

10. 

INPCI. 

a. 

INPFI . 

12. 

ITOJ. 

13. 

outbt. 

1*. 

OUTCI . 

15. 

OUTCR. 

16. 

Q1NTRY. 

IT. 

RANDOR. 

IB. 

REWlNO. 

19. 

sn. 

20. 

SORT. 

21. 

STOP. 

22. 

Tan. 

23. 

TAPE6» 

26. 

XTOI. 

213. 

219. 

220. 
2  21. 
222. 
223. 
22*. 

225. 

226. 

227. 

228. 

229. 

230. 

231. 

232. 

233. 
236. 

235. 

236. 

237. 

238. 

239. 
260. 
261. 
262. 
263. 
266. 

265. 

266. 

267. 

268. 
269. 

250. 

251. 

252. 

253. 
256. 

255. 

256. 

257. 

258. 

259. 

260. 
261. 
262. 
263. 
266, 

265. 

266. 

267. 

268. 

269. 

270. 

271. 

272. 


penoevu 

9ESU9LY 

revise 

9ITEI 

RITE3 

PITER 

RLA808 

RLCORO 

9LEMAKT 

9LRAI0 

RLTGTAK 

9LTGTYP 

9LP AVE 

90NDSEE 

POUTER 

SamaTOn 

SAMP9CM 

SAmSEE 

SAMPYPE 

SCHEOUL 

SCHTA8 

SDIGEST 

SECONO 

SEEKENG 

SEEK® 

SEEKT  AC 

SEEKTEU 

SELECT 

SETASSN 

SHPKtLL 

SHUFFLE 

SKS8TR* 

SNAP 

SSL  L 

ST  aTsaK 

ST  I  C< 

TEPMACQ 

tel  ycpc 

TGT30NE 

TGThEx 

Thm2°S 

THTRPLN 

THX2XY 

TM2HX 

TOAOIL 

TOP  £9 

TRACE 

TRKOE* 

TPPRmT 

TPPP'jT 

TPPP9T 

TPYShOT 

TXY2mX 

TXY2HXL 

UMPIRE 
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1.  A8SEE 


2.  A8VSC0R 


3.  A82CRC 


*.  ACCEPT 


5.  ACER AO 


CALLS! 

UNPACK 
DELAOO 
RELEASE 
TAPES# 
OUTCI . 


CALLED  9T! 

PERCEPT 


CALLS!  CALLED  3TI 

ENTRYP  REVISE 

CLOSCOR 

GIMME 

A008L0K 

EXITP 


CALLS!  CALLED  3Y! 

UNPACK  CRCTHNK 

RELEASF 

F IN08LK 

GIMME 

A0O9LOK 

T  APES# 

OUTCI. 

OROP9LK 


CALLS!  CALLEO  8YI 

UNPACK  9YCM0PR 

SEEKP  9VCMDPR 

GIMME 
STOP. 

STICK 

DETECT 

DELAOO 

PACK 

TAPES# 

OUTCI. 

8YALC0V 

RELEASE 

8YHE0UP 

OUTA 


CALLS!  CALLED  3Y I 

GIMME  SCMEOUL 

UNPACK 

CRFLTML 

A008L0K 

OPTPTM 

RELEASE 

PACK 

FLTGEOM 

MEXOIST 

DELAOO 
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6.  A006L0*  CALLS! 

ENTRYP 
EX  I  TP 


7.  AOUMP  CALLS! 

OUTCI. 

OUTCR. 

a.  A  r R  fHNK  CALLS! 

hExoist 

MES8IL0 

OELAOO 

TGTMgx 

TAPES* 

OUTCI • 

RANDOM. 

9.  ALLO0AT  CALLS! 

PRIORTY 

MES8ILD 

GIMME 

PACK 

T  APE&# 

OUTCI . 

OUTA 

OELAOO 

TANK 

stick 

TOaOil 

10.  ALLOF'J  CALLS! 

GIMME 
STICK 
OELAOO 
TAPES* 
OUTCI . 

11.  AllOPAT  CALLS! 

GIMME 


PAGE  9 

CALLED  8Y 1 

UOLLOAO 
REOEBRF 
MOMUCI T 
NEMMOVE 
I NT2CRC 
isitaco 

GOGETEm 

FLYSEE 

FIMOIT 

finoflt 

CPFLTMl 

CANOTGT 

BAOMOVE 

atkases 

aCFrag 

A8VSCOR 

A82CRC 

Called  syi 

halt 

reccon 

Called  8YI 

TFLYCRC 


Called  byi 

seektac 

SEEKENG 

80CTINK 


CALLED  9Y! 

SEEKTFU 

3ATTC0V 


CALLEO  BY! 

SEEKTFU 
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STICK 

OELAOO 

T  APES* 

OUTCI. 

BATTCOV 

ammoChk 

CALLSI 

MESS ILD 

OELAOO 

GOTOER. 

8YNOTRD 

TAPE6P 

OUTCI. 

CALLED  BY  1 

ENGAGE 

ASSIGN 

CALLSI 

GETPTRS 

INTASTN 

CALLED  9TI 

select 

ATKASES 

CALLSI 

GIMME 

OELAOO 

DESTROY 

TAPE6* 

OUTCI . 

A008LOK 

thhz»s 

ATAN2. 

called  by: 

CfLYCRC 

ATTACK 

CALLSI 

GETPTRS 

UNSTAT 

SHRKILf 

PINOBLK 

XPK 

RANOOM. 

NUK8LN0 

0R0P8LK 

HISTORY 

OELAOO 

STatpak 

CALLED  BY  I 

SELECT 

AUTOP9I 

CALLEO  BY  1 

SAMATON 

PREPAEU 

BYCONHD 

AvAILBL 

CALLSI 

PELAOO 

RELEASE 

CALLED  BYl 

THTRPLN 

AZ I L  I M 

CALLSI 

SIN. 

COS. 

INSECT 

SORT. 

CALLED  BYl 

INRANGE 
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19.  BAOMOvE  CALLSI 

FINO0LK 

GIMME 

A008L0K 

HISTORY 

UNPACK 

RELEASE 

DR0P3LK 

T3THEX 

HEXOIST 

MESBILO 

delaoo 


20.  3ATCEAS  CALLS! 

CANCALO 

gimme 

unpack 

SEEKTFn 

STICK 

RELEASE 


CALLED  BY! 

crctrak 


CALLED  8Yf 

TRYSHOT 

HANOZPT 

0YCONTC 

BYPONFO 

BY'lOTRD 

9YC0NLS 

3YCMOPR 

3TRYTNK 


21.  8ATTC0V  CALLS  I 

TRKCHEk 

ALLOFU 

AtLOPAT 


CALLED  3YJ 

8 Y  ALCO V 
3YC0NTC 
3YP0NER 
3YSMTRK 
3YHEDUP 
3YC0NH0 


22.  BATTOuT  CALLSI 

YANK 

3NLALLE 

UNPACK 

CMKLASr 

GIMME 

RELEASE 

SSLL 


CALLED  8yi 


8YUPDAT 

3NP0N8D 


23.  3LK0AT 

2A.  3NCMOPR  CALLS*  Called  3y* 

G0T3ER.  30CTINK 

ACCEPT 

MES3ILD 

OELAOO 

SEEKP 

OROPPOS 

dilout 


25.  BNCONhO 


CALLSI 

TAPE6* 

OUTCI. 


CALLED  3Y I 

8MC0NTC 
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GIMME 

mesbild 

PRIORTY 

PACK 

OELAOD 

YANK 

STICK 

RELEASE 

OROPPOS 

SEEKTAC 

OLTACT 


26.  BNCONLS  CALLSI 

OROPPOS 

OILOUT 

MES3ILD 

OELAOD 


27.  9NCONTC  CALLSI 

CHKCOV 

OROPPOS 

BNLALLE 

SETASSN 

SEEKTAC 

GIMME 

olyact 

CHKL  AST 

BNCONHO 

8NRECOV 

TAPES# 

OUTCI . 

YANK 

STICK 

TOAOIL 

OILOUT 


2B.  BNLALLE  CALLSI 

MESBILD 

OELAOD 

YANK 

HANOZPT 

OILOUT 

STICK 


29.  9NN0T90  CALLSI 

T  APE6* 


CALLED  BY  I 

SOIGEST 


called  by i 

SOIGEST 
BNPQND A 


CALLED  BYI 

TRYSMOT 

SOIGEST 

TRKCHEK 

SAMPRCM 

BYCONTC 

9NC0NTC 

BYNWTRK 

BYENOPS 

BYCONLS 

8TRYTNK 

30CTINK 

BNP0NE7 

9NP0N0A 

BNNNTRK 

BATTOUT 


CALLED  BYI 

BYUPOAT 


RAGE  12 


378 


ourci. 

SELEaSE 

OILOUT 


avpoNSO 
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UNPACK 

CHKLAST 

SEEKTAC 

GIMME 

PACK 

OLYACT 

seekeng 

MES8ILD 

oelaod 

yank 

STICK 

REAOIL 


BnPONFA 

CALLS) 

SEEKP 

TAPE6* 

OUTCI. 

8NRECOV 

CALLED  BY) 

bnponfo 

CALLS) 

SEEKP 

TAPE6* 

OUTCI. 

RELEASE 

YANK 

OROPPOS 

oilout 

MES8IL0 

OELAOD 

CALLED  BY) 

BNPONSS 

CALLS) 

UNPACK 

80T0ER. 

Bnponbb 

seekeng 

GIMME 

OLYACT 

8YUP0AT 

CALLED  BY) 

BnRECOV 

CALLS) 

UNPACK 

NTHQRAW 

PACK 

CALLED  BY) 

BOCTINK 

CALLS) 

BNP0N5S 

BNPONEP 

BNCMOPR 

3NP0NFA 

BNPONFO 

RELEASE 

SDIOEST 

BNPONOA 

TAPE6# 

OUTCI. 

CALLED  BY) 

80CTINK 


BOCTINK 


BOCTINK 


BNCONTC 

BNPONFA 


PONOER 
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OROPPOR 

8NLALLE 

NES3IL0 

OELAOO 

OILOUT 

BNPONBn 

SANATOn 

ALLOSAT 


AO.  9TNASTN  CALLS* 

UNPACK 

EJN08LK 

PACK 

hexoist 

RELEASE 

0R0P8LK 

MESStLO 

OELAOO 

T  APES* 

outer. 


41.  8TN2CSC  CAULS t 

UNPACK 

RELEASE 

TAPES* 

OUTCt. 

CRCLOSS 

CRCKIL 

CRCTSAK 


A?.  3TRYTNK  CALLSI 

8TCMOPO 

SDI5EST 

SEEKP 

3YP0NTM 

8YP0NEP 

TAPES* 

OUTCZ. 

YANK 

8ATCEAS 

8NLALLE 

MES8IL0 

OELAOO 

9YPONFD 

SAMATON 

9YPONRL 

9YPONRS 


43.  8YALCOV  CALLSI 

UNPACK 

PACK 

S1MME 

SSLL 

CANCALO 

SEEKTEU 


CALLED  3Y» 

INTASIN 


Called  by  t 

CRCTWNK 


called  BY  I 

PONOER 


CALLED  9Yt 

8YCONTC 

8YCMOPB 

ACCEPT 
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RELEASE 
PATDEC 
8 ATTCOV 

olyact 

TAPE6# 

OUTCI. 


**•  8YCMOPR  CALLS!  CALLED 

ACCEPT 

SEEKP 

TAPES# 

OUTCI. 

BATCEAS 

OILOUT 

0YALCOV 

BYHEOUP 

RELEASE 


AS.  BYCONMO  CALLS!  CALLED 

TAPE6# 

OUTCI . 

OELAOD 

autoprt 

STICK 

RELOCAT 

BATTCOV 

GIMME 

OLYACT 

A6.  8YC0NLS  CALLS!  CALLED 

BATCEAS 

BNLALLE 

MESBILD 

OELAOD 

OILOUT 

AT.  BYCONTC  CALLS!  CALLED 

MESBILD 

DELAOO 

INRANGE 

BATCEAS 

BNLALLE 

PREPAFU 

BATTCOV 

GIMME 

OLYACT 

BYCONMO 

UNPACK 

BYALCOV 

STICK 

RELOCAT 

YANK 

TOAOIL 

A®.  8YENDPS  CALLS!  CALLED 


BY! 

BTRYTNK 


BY! 

BYCONTC 


BY! 

SOIGEST 


BY! 

SOIGEST 

BYPONTM 


BY! 
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SEEKS 

UNPACK 

YANK 

RELEASE 

GETPTRS 

CPCLOSS 

9NLALLE 

sammype 

SAMPRCM 

8YPONF0 

3YH£OUP 

calls: 

seeks 

unpack 

OELAOO 

RELOCAT 

BATTCOV 

MES8ILO 

release 

called 

3Y! 

BYCMOPR 

ACCEPT 

9YNOTPO 

CALLS! 

UNPACK 

8ATCEAS 

OlLOUT 

TAPE6# 

OUTCI  . 

CALLED 

3Y ! 

ammochk 

8YNMTRK 

CALLS! 

MEsaiuo 

OElA 00 

8NLALLE 

INPANGE 

PREPAFt) 

8ATTC0V 

8INME 

OLYACT 

STICK 

RELOCAT 

Called 

3YI 

SOIGEST 

SYPAS'jP 

CALLS! 

SEEKS 

UNPACK 

SIMME 

PACK 

NEKPERC 

GETPTRS 

CRCTRAK 

called 

BY! 

SAMPRCM 

53.  arPONfs  calls»  called  bt» 

unpack  btrytnk 

cancalo 

SEEKTFU 

9ATTC0V 

OILQUT 

PACK 

OELAOO 

ptponer 
MESS l LO 
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RELEASE 

54.  3YP0NF0  CALLS! 

SEEKP 

YANK 

RELEASE 

3ATCEAS 

DILOUT 

8YENDPS 

HES8IL0 

OELAOD 

55.  8YPONRL  CALLS! 

UNPACK 

3QT0ER. 

FILERUP 

INRANGE 

PREPAFU 

MES8ILD 

OELAOO 

SEEKTFu 

TAPES* 

OUTCI. 

56.  3YP0NRS  CALLS! 

unpack 

reload 

TAPE6P 

OUTCI. 

RELEASE 

57.  9YPONTM  CALLS! 

9IMME 

UNPACK 

PACK 

TAPE6# 

OUTCI. 

3YCONTC 

TRYSMOT 

OELAOD 

RELEASE 

58.  3YTKCHK  CALLS! 

SORT. 

A  T  AN2 . 

LOSRAOR 

OELAOO 

YANK 

STICK 

TOAOIL 

59.  3YUOOAT  CALLS! 

UNPACK 

BNNOTRO 

9ATT0UT 


PA3E  19 


CALLED  3Y I 

8TRYTNK 


CALLED  3Y  1 

9TRYTNK 


CALLED  3Y! 

BTRYTNK 


CALLED  BY  I 

BTRYTNK 


CALLED  3Y! 

SAMPRCH 


CALLED  3 Y ! 

3NP0NSS 
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19 


COVAPLY 

GIMME 

PACK 

SSLL 

OECRALO 

seektac 

OL  TACT 

release 

60  •  CAnCAi.0 

CALLS* 

YANK 

RELEASE 

TAPE6P 

cure:. 

REAOIL 

CALLEO  By 1 

PTPONEP 

8YALC0V 

PATDEC 

BYPONER 

batceas 

61.  CANOTST 

callsi 

Entryp 

FINDBLK 

CLOSCOR 

JGESUIT 

FORMTST 

GIMME 

ADD8L0K 

TGTGONE 

PTREE 

RANDOM. 

PELAOD 

EXITP 

CALLEO  3Y I 

THTRPLY 

62.  CENTER 

CALLSI 

ENTRYP 

EXITS 

CALLEO  BY  I 

XYHHA 

TXY2HXL 

63.  CELYCRC 

CALLSI 

CRCSEE 

U NSTAT 

ELYSEE 

ATXASES 

CRC2INT 

POnOSEs 

3NOLOOK 

STATBAK 

CALLED  9YI 

PERCEPT 

6*.  CHKCOv 

CALLSI 

unpack 

INRANGF 

gImke 

TAPE6* 

OUTCI . 

OUTA 

oelaod 

CALLED  BY  I 

3VC0NTC 

3NB0N0A 

BNNkTRK 

65.  CHKLAST 

callsi 

0R0PO0S 

CALLED  by  1 

9NC0NTC 
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PRIORTY 

RELOCAT 

delaoo 

66.  CL  1ST  CALLS i 

PAGE 

lnplot 

MESAGE 

PITEP 

RITER 

RITE! 

TAPE6# 

OUTCI . 

OUTCR. 

CLIST2 


67.  CLIST2  CALLSI 

PAGE 

LNPlOT 

MESAGE 

RITEI 

RITER 

TAPC6# 

OUTCI. 

OUTCR. 

RITE® 

68.  CLOSCOR  CALLSI 

ENTRYP 

MEXOIST 

EXITP 

69.  CNACTTK  CALLSI 

YANK 

RELEASE 

70.  COMMAnO  CALLS! 

UNPACK 

GOTOER. 

OELAOO 

TAPE6# 

OUTCI. 

MESaiLn 

eltmype 

THM?PS 

ATAN2. 

71.  COMMO  CALLSI 

unpack 

OELAOO 

RELEASE 

PACK 


PAGE  20 

8NP0NEP 

8ATT0UT 


callEO  an 

malt 

UNSTAT 

TGTHEX 

TRKCMEK 

SAMPRCM 

NAY0OR 

HEXMOYE 

MCXCHZ 

FSOUMP 

fltkype 

FIN08LK 

CRCOIES 

INTASIN 

CALLED  BY  I 

CLIST 


CALLED  3YI 

CANOTGT 

A8VSC0R 


CALLED  BY  I 

OILOUT 


CALLED  BY  I 

FLITE 


called  3YI 

select 
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V 
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72. 

CONTROL 

CALLS  1 

entryp 

ltree 

SELECT 

SNAP 

UNSNAP 

RELEASE 

SECOND 

HLTPNT 

exitp 

CALLED 

3  Y  t 

MADEM 

73. 

CORBOUN 

CALLS  1 

ENTRYP 

GIMME 

TMM2PS 

TXY2HXL 

HEXOIST 

SIN. 

COS. 

LINEX 

OPTOTM 

EXITP 

called 

3Y« 

tmtrpln 

7*. 

COVAPLY 

CALLS  1 

SEEKTAC 

GIMME 

olyact 

RELEASE 

called 

9Yt 

9YUP0AT 

9NPON0O 

75. 

CRCDIES 

CALLS  * 

UNPACK 

RELEASE 

OELAOO 

FIN09LK 

TRACE 

MESAGE 

RITEI 

clist 

0R0P9LK 

called 

9y: 

destroy 

76. 

CRCEVnT 

calls* 

GIMME 

TAPE6# 

OUTCI. 

OELAOO 

RELEASE 

FIN08LK 

OETECT 

UNPACK 

HEXOIST 

LOSRAOR 

cos. 

RANOOM. 

CRCTRAK 

called 

9Y» 

CRCSEE 
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CRCKIL 

CALLS! 

F I NOSLK 

UNPACK 

RELEASE 

OROP8LK 

TAPES# 

OUTCI. 

DELAOO 

CALLED  RYI 

INT2CRC 

CRCTRAK 

CRCTMNK 

8TN2CRC 

CRCLOSS 

CALLS! 

FINOBLk 

UNPACK 

OROPSLk 

DEL ADD 

CALLED  8Y 1 

SAMPRCM 

CRCTHNK 

8YENDPS 

BTN2CRC 

CRCSEE 

calls: 

RELEASE 

GIMME 

UNPACK 

OELAOO 

crcevnt 

CALLEO  8YI 

CFLYCRC 

CRCTHNK 

CALLS! 

unpack 

RELEASE 

CRCKIL 

CRCTRak 

crcloss 

abzcrc 

INT2CRC 

9TN2CRC 

CALLED  8 Y ! 

TFLYCRC 

CRCTRak 

CALLS! 

FJNOBLK 

unpack 

MES8ILD 

DELAOO 

TAPE6# 

OUTCI. 

CRCKIL 

BAOMOVE 

0R0P9LK 

RANDOM. 

NEKMOVE 

called  by : 

SAMPRCM 

CRCTHNK 

CRCEVNT 

8YPASUP 

8TN2CRC 

Cac2lvT 

CALLS! 

unpack 

TAPE6# 

OUTCI. 

MESBILD 

OELAOO 

OPTPTM 

RELEASE 

THMgSs 

CALLED  BY! 

CFLYCRC 

22 
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83.  CREATE 

C ACC St 

ENTRYP 

GIMME 

EXITP 

CACCEO 

84.  CRECTMC 

CACLS» 

CREATE 

GIMME 

UNPACK 

PACK 

AOOBCOK 

HISTORY 

calced 

SB.  OSGREaO 

CACLS« 

ouTcr. 

INPCI . 

EOF 

OECOOt. 

CACCED 

86.  OECRAI.O 

CACCS 1 

MES8IC0 

OECAOO 

TAPE6A 

OUTCI » 

CACCEO 

87.  OECAOO 

CACCS l 

ENTRYP 

MESAGE 

TRACE 

RECER 

GIMME 

SNAP 

CTRMRG 

EXITP 

cacceo 

9r  t 

CRECTMC 


ay » 

GOOETEM 

ACERAG 


art 

MAQEM 


8YI 

a  r MORA  it 
3YUP0AT 


art 

UMPIRE 

T3AER 

thtrpcn 

smrkicc 

SETASS* 

seektac 

SEEKENG 

SOIGEST 

SAMMYPE 

SAMSEE 

SAMATOM 

RESUPLY 

REI.OAO 

REAOIC 

PTPONER 

PREPAEU 

MUOLNO 

NEaPERC 

VEaMOVE 

8 YTKCrK 

8 YCQNTC 

3SLALLE 

SAYBOR 

KILEUT 

IVTRELY 

I MT2CRC 

ISTEINO 
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CRC2INT 

GOGETEM 

3NOLOOK 

FUELCHK 

FUYSEE 

FLY 

FL1TE 

FILERUP 

ENGAGE 

0R0PPS2 

OROPPOS 

oogthnk 

OOGFITE 

DESTROY 

OECRALO 

crctrak 

CRCSEE 

CRCLOSS 

CRCKIL 

CRCEVNT 

CRCOIES 

COMMO 

COMMAND 

chkuast 

cmkcov 

8YPONTM 

8YPONRL 

8YP0NFD 

8YPONER 

SYNMTRM 

8 YHEDUP 

8 Y CONUS 

8YC0NM0 

BTRYTNK 

BTNASIN 

90CTIN* 

8NPONFO 

8NPONEP 

8NP0N88 

8NCONUS 

3NCONMO 

BNCMDPR 

3ADMOVE 

INTASIN 

ATTACK 

ATKASES 

AMMOCHU 

AU.OPAT 

AU.OFU 

aulobat 

airthnk 

ACFRAG 

accept 

A9SEE 

MAOEM 
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88.  DESTROY  CALLS!  CALLED  BY! 


TAPE6# 

UMPIRE 

OUTCI . 

TOMER 

SETPTRS 

shrkill 

TERRACO 

RE0E8RE 

KILELIT 

ELY 

SIMMS 

003FITE 

DELADD 

SAMMYPE 

CRCDIES 

UNLINK 

RELEASE 

UNSTAT 

atkases 

89.  OETECT 

CALLS! 

Called  BY! 

HEXOIST 

SAMPRCM 

UNPACK 

IMT2CRC 

THH2PS 

ELYSEE 

AT  AN2 • 

crcevnt 

LOSRAOR 

COS. 

RANOOM. 

TAPES* 

OUTCI. 

accept 

90.  OGTSH* 

CALLS! 

rrou. 

91.  DILOUT 

CALLS! 

CALLED  BY  t 

CNACTTk 

SAMATON 

RELEASE 

ptponer 

UNPACK 

mandzpt 

YANK 

bmlalle 

TOAOIL 

8MC0NTC 

8YP0NEQ 

BYPONER 

6YN0TR0 

BYCONLS 

BYCMQPR 

BOCTIN* 

BNPONFD 

BNNOTRD 

8MC0NL5 

8NCM0PR 


DISPABQ 

CALLS! 

CALLED  BY! 

OUTCI. 

DISPDAT 

OtSPACO 

CALLS! 

CALLED  8Y1 

OUTCI. 

dispelt 

DISPOAT 

OISPACL 

CALLS! 

CALLED  By  I 

OUTCI. 

OISPACR 

PA3E  26 


95.  QISPAC9  CAULS  I  CALLED  BY! 


OUTCI • 

0 1  SB ACL 

OISPOAT 

96. 

OISPAOS 

CALLS  I 

OUTCI. 

called 

BY! 

OISPOAT 

97. 

0ISPAO0 

CALLS! 

OUTCI. 

called 

BY! 

dispflt 

OISPOAT 

98. 

OISpOaT 

CALLS! 

OUTCI. 

OISoaOS 

OISPFOB 

OISPFLT 

0ISP4C0 

OISPPAF 

OISBPflO 

OISPAOO 

oispabo 

oispacb 

called 

BY! 

HAOEm 

99. 

otspfob 

CALLS! 

OUTCI. 

OISPFMF 

called 

BY! 

OISPOAT 

100. 

otspflt 

CALLS! 

OUTCI. 

OISPOAY 

OISPAOO 

OISPACD 

OISPPRO 

called 

BY! 

oispfmf 

OISPOAT 

101. 

OTSPFmF 

CALLS! 

OUTCI. 

OISPFLT 

called 

BY  I 

0ISPF03 

102. 

OtSPPAF 

CALLS ! 

OUTCI. 

OISPPYB 

called 

BY! 

OISPOAT 

103. 

01SPP4Y 

CALLS' 

OUTCI. 

OISPPYB 

called 

BY! 

OISPFLT 

104. 

OtSPPPO 

CALLS! 

OUTCI. 

called 

9YI 

OISPFLT 

OISPOAT 

105. 

01SPPY3 

CALLS! 

OUTCI. 

called 

BY! 

OISPPAY 

OISPPAF 


392 


PA3E  27 
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V 

i 


i 
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106.  olyact  cauls i 

UNPACK 

PACK 

STICK 


107.  DOGFITE  CAULS  I 

GETPTRS 

UNSTAT 

TAPE6P 

OUTCI. 

HISTORY 

FINOSL* 

OROP0UK 

OELAOO 

XPAA 

RANDOM. 

8IMMC 

OCSTROY 


CALLED  8Y l 

wThoraa 

SOIGEST 

BYALCOv 

BYCONTC 

BNCONTC 

0RQPPS2 

OROPPOS 

COVAPLY 

BYUPOAT 

BYNPTRK 

BYCONMO 

BNPONSS 

BNBONEP 

9NSONOA 

8NOONB3 

8NNWTRK 

BNCONHO 

CALLED  9 Y I 

SELECT 


108.  OOGTHNK  CALLS* 

mesbilo 

OELAOO 

TAPE6P 

OUTCI. 

G0T0A8 

FUELCHK 


CALLED  BY! 

TFUYCRC 


109.  OROPBi.K  CAULS!  CALLED  BY! 

Entryp  s  ahhype 

RELEASE  NUKBLNO 

EXITP  NOPUCIT 

KILFLIT 

INT2CRC 

HEXMOVE 

FUTFYPE 

OOGFITE 

CRCTRAK 

CRCLOSS 

CRCKIL 

CRCOIES 
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■  y.  "  air 


393 


3TNASIN 

BAOMOVE 

ATTACK 

A82CRC 


110.  OROPPOS 


111.  0R0PPS2 


CALLS  I 

YANK 

RELEASE 

NESBILD 

OELAOO 

SEEKENG 

SIMHE 

OLYACT 


CALLSI 

YANK 

RELEASE 

MES8IL0 

OELAOO 

SEEKENG 

8IMNE 

OLYACT 


HZ.  ENGAGE  CALLS! 

GETPTRS 

TRYSHOT 

TAPES# 

OUTCI • 

9INME 

OELAOO 

UNPACK 

PACK 

AMMOCHK 

RELEASE 

HISTORY 


CALLEO  8Y! 

SEEKTAC 

SAHPRCH 

3NC0NTC 

CHKLAST 

80CTINK 

8NP0NF0 

8NPONEP 

8NC0NLS 

3NCONHO 

8NCMDPR 


CALLED  BY  I 

SEEKENG 


CALLED  9 Y  X 

SELECT 


H3.  Entry# 


CALLS! 

MESAGE 

RITE! 

RECE9 

TAPES# 

OUTCI. 

ROUTER 

ITRAP 

SECOND 


CALLED  8YJ 

ltrmrg 

UNPACK 

UOLLOAO 

UNSNAP 

TXY2HXL 

TXY2HX 

THX2XY 

THTRPLN 

THH2PS 

T5T80NE 

SNAP 

SELECT 

SCHTAB 

RLWAVE 

RLT3TYP 
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bltstak 

RL^AIO 

RLFMAKT 

RLCORO 

RLA808 

REVISE 

RELIST 

RELEASE 

PTREE 

PLANOUT 

PLAN 

PELAOO 

PACK 

OUTA 

NOnllCIT 

ltree 

LOAOPL 

LINEX 

KOMPARE 

JUGGLE 

JTJ 

JSESUIT 

INITAC3 

IJ2HX 

HXOGTS 

HOLD 

HLTPNT 

HISTORY 

HEXHULT 

HEXMLT 

HEXINV 

HEXCHZ 

HEXADD 

GIMME 

GETPTRS 

3ETHEX 

FSDUMP 

FORMTGT 

FTNDFLT 

F I ND8LK 

FETCH 

DROP8LK 

DELAOO 

CREATE 

COR80UN 

CONTROL 

CLOSCOR 

CENTER 

CANOTGT 

A008L0K 

A8VSC0R 

MAQEM 


called  BY  I 

halt 
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OUTCI. 


FSOUMP 


115.  EOF 


calleo  ay« 

08QREA0 


116.  EXITP  CALLS: 

SECOND 

MESAGE 

RITEl 

RECER 

TAPE6# 

OUTCI. 

ITRAP 

I CHECK 


called  by: 

ltrmrg 

unpack 

uolloao 

unsnap 

TX Y2HXL 

TXY2HX 

THX2XY 

THTRPLM 

thh2ps 

T3TG0NE 

SNAP 

SELECT 

SCHTA8 

RLWAVE 

RLTGTYP 

RLTGTAK 

RLRAIO 

RLFMaKT 

RLC0RD 

RLABD8 

REVISE 

RELIST 

RELEASE 

PTREE 

PLANOUT 

PLAN 

PELAOD 

PACK 

OUTA 

NONUCIT 

LTREE 

LOAOPL 

linex 

KOMPARE 

JUGGLE 

JTJ 

JGESUIT 

INITACO 

I J2HX 

HXOGTS 

NOLO 

HLTPnT 

HISTORY 

HEXHULT 

HEXHLT 

HEX  I NV 

HCXCHZ 

HEXAOO 

GIMME 
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GETPTRS 

GETHEX 

FSOUMP 

EOPMTGT 

FINDFLT 

FINOBL* 

FETCH 

DROPBLK 

DELADD 

CREATE 

CORBOUN 

CONTROL 

CLOSCOR 

CENTER 

CANDTGT 

A008L0K 

A9VSC0R 

RADEM 

117.  PELOEl. 


118.  RETCH 


119.  R1LERUP 


1 20.  ETN08LK 


NEkMOVE 

KltELIT 

INT2CRC 

MEXMOVE 

GOGETEH 

GNOLOOK 

FORRTGT 

FLTRYPE 


CALLS  1 

CALLEO 

3Y 

I 

UNPACK 

SELECT 

UNSNAP 

RELEASE 

TAPES# 

OUTCI. 

CALLS  > 

CALLED 

BY 

: 

ENTRTP 

MX  OEM 

INP8I. 

EXITP 

CALLS  * 

called 

BY 

I 

RANOOM. 

9Y90NRL 

TAPES# 

BNP0N83 

OUTCI. 

GIMME 

YANK 

STICK 

OELAOO 

callsj 

called 

BY 

1 

ENTRYP 

torEr 

ROUTER 

THTRPLN 

MESAGE 

SARRYPE 

R1TEI 

reoebrr 

CLIST 

NUK8LNO 

EXIT9 

NORUCIT 
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FI  MO  IT 

FImOFLT 

DOGFITE 

CRCTRAK 

CRCLOSS 

CRCKIL 

crcevnt 

C9CDIES 

CANOTGT 

9TNASIN 

9A0M0VE 

INTASIN 

ATTACK 

A92CRC 


121.  FINOFuT 

C ALUS  1 

ENTRYO 

HEXOIST 

FIN09LK 

KOMPARF 

GIMME 

A009L0K 

EXITP 

called 

9YI 

FORMTGT 

122.  FtNOIT 

CALLS  1 

FIN08LK 

GIMME 

A008L0K 

called 

9Y  I 

INTFINO 

123.  fIRECmK 

CALLS  1 

THX2XY 

SIN. 

COS. 

SORT. 

AT  AN2 . 

ASIN. 

CALLED 

9  Y  I 

TRYSMOT 

124.  FttTE 

CALLS  1 

INTRFLY 

UNPACK 

COMMANO 

MEXCMZ 

OPTBTH 

RELEASf 

SIN. 

DEL AOO 

called 

3Yt 

FLY 

125.  Fi_TGEOM 

CALLSI 

PACK 

MEXCMZ 

THM2PS 

ATAN2. 

calleo 

9YI 

GOGETEM 

ACFRAG 

126.  FuTWYOg 

CALLSI 

UNPACK 

called 

9YI 

KILFLIT 
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RASE  33 


127.  ELY 


128.  ELYSE* 


129.  EoRMTOT 


130.  ESOUMP 


CALLS* 


CALLS* 


CALLS* 


calls* 


RELEASF 

S0T0A8 

EIN08LK 

COMMANO 

TRACE 

MESA5E 

RITCt 

CL  1  ST 

FSDUMP 

OROP8LK 

RACK 

CALLEO 

8YI 

8ETPTRS 

SELECT 

l/NST  AT 

HEXMOVE 

EUElCHK 

SHRKTLL 

ELITE 

OELAOO 

STATBAK 

GIMME 

PACK 

TAPES# 

OUTCl. 

OESTROY 

called 

8YI 

OELAOO 

CELYCRC 

gimme 

A008LOK 

TAPES# 

OUTCl. 

MES8IL0 

RELEASE 

HEX0IST 

OETECT 

history 

1 

called 

9Y1 

ENTRYP 

CANOTGT 

GIMME 

EIN08LK 

EINOELT 

RELEASE 

EXIT# 

CALL CO 

8  Y 1 

EnTryp 

YAMK 

trace 

UNSTaT 

entstat 

trkchek 

CL  TST 

■JTJ 

riter 

ELTKYPE 

LNPLOT 

lcmloc 

TAPE6# 

OUTCl. 
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131. 

132. 

133. 

134. 


135. 


PA3E  34 

OUTCR. 

EXITP 


FSINIT 


called  art 

MAOEM 


FUELChK  CALLS  I 

UNPACK 

NEXQtST 

QOTQAB 

TAPES* 

OUTCI. 

MES8IL0 

DELAOO 


called  art 


ELY 

oogthnk 


GETHEX  CALLSI 

ENTRYP 

MXOGTS 

MESASE 

R1TEI 

GIMME 

scmt  ab 

EXITP 


CALLED  BY  1 

TXY2MXL 

SCHEDUL 

PTRANO 

NUKBLNO 

nomucit 

mExCmz 


GETPTRS  CALLS!  CALLED  BY  I 

ENTRYP  TOMER 

EXITP  RONOSEE 

PONDER 

PLAN 

PERCEPT 

SAMPRCN 

FLY 

ENGAGE 

DOGFITE 

DESTROY 

BYPASUP 

9YEN0PS 

ATTACK 

ASSIGN 


GIMME  CALLSI 

ENTRYP 

malt 

MESASE 

ritei 

ritep 

EXITP 


CALLED  8YI 

MTMDRAM 

UOLLOAD 

UMPIRE 

TOMER 

TOAD  IL 

T3TGONE 

SHRKILL 

SEEKTAC 

SEEKENG 

SOIGEST 

SAMWYPE 

REVISE 

RESUPLY 

RELOAO 
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PAGE 


RELEASE 
RE0E8RF 
BY  ALCOV 
AELAOO 

optpth 

HUKBLNO 

MOPUCIT 

HEPPERC 

REPMOVE 

8YCONTC 

BPCONTC 

PAY80R 

PES0ILD 

KILFLIT 

IPT2CRC 

ISITACU 

30GETEP 

SETHEX 

FORMTGT 

FLYSEE 

FLY 

FfYDIT 

FIPDFLT 

FTLERUP 

ENGAGE 

DR0PPS2 

OROPPOS 

OOGFITE 

DESTROY 

DELADO 

CRFLTML 

CREATE 

CRCSEE 

crcevnt 

cdvaply 

corboun 

CRPCOV 

CAM0T3T 

8 YUPOAT 

BYPONTR 

BYPASUP 

BYNPTRK 

SYCONMO 

BSPONSS 

BSPONEP 

BNPONDA 

BNPONBB 

BPNPTR* 

SNCONHO 

BATTOUT 

BATCEAS 

8AOMOVE 

ATXASES 

allopat 

allofu 
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page 


4l_Uu8AT 
ACFR AG 
ACCEPT 
A8VSC0R 
A82CRC 


136.  GNDLOOK 


13T.  GOGETEH 


138.  Q0T0A9 


139.  HALT 


CALLS  I 


CALLED  8YI 


CALLS! 


CALLS! 


CALLS! 


FIN08LK 

CFLYCRC 

XPO 

RANOOM. 

OELAOO 

HISTORY 

TAPES* 

OUTCI. 

UNPACK 

THH2PS 

AT  AN2 • 

called 

3V  I 

UNPACK 

TO*ER 

FIN08LK 

CRFLTMl 

TAPE6* 

OUTCI. 

GIHHE 

A008L0K 

PTRANO 

PACK 

FLTGEOH 

UOLLOAO 

INITACO 

OELAOO 

MES8ILD 

calleo 

3YI 

UNPACK 

FUELCHK 

FLTWYPE 

DOGTMNK 

OPTPTH 

RELEASE 

THH2PS 

AT  AN2 . 

called 

BY  1 

HOLO 

UNPACK 

OUTCI. 

ITRAP 

riter 

RECCON 

ritei 

SELECT 

trace 

RELEASE 

RECER 

PACK 

entstat 

hltpnt 

CLIST 

GINME 

PAGE 

MAOEN 

AOUHP 

ISOUHP 

ENOFIL. 
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STOP 


PA3E 


37 


HanDZoT 

CALLSI 

8ATCEAS 

YANK 

STICK 

TOAOIL 

PELOCAT 

DILOUT 

called  8YI 

8NLALLE 

mexaoo 

CALLSI 

entpyp 

ITOJ. 

EXITP 

CALLEO  BY  1 

5CHEDUL 

ptpano 

nukBlnd 

nokucit 

HEXNLt 

HEXCHZ 

f 


1*2.  HEXCMZ  CALLS  I  CALLED  9YI 


ENTPYP 

o°tpth 

TRACE 

FLTGEOH 

MES4SE 

FLLTC 

RITCP 

CLIST 

HEXAOO 

HEXINW 

GETHEX 

EXITP 

143.  HEXOIST  CALLED  BY  I 

SCMEDUL 

MAT80H 

MTPFLY 

FUELCH* 

FlySEE 

FINOFLT 

DETECT 

CKCEVNT 

copeouM 

CLOSCOP 

STNASIM 

840NOVE 

IVTASIN 

aipthnk 

acfpas 


1*4.  HEXINV 


CALLSI 

ENT9YP 

ITOJ. 

EXITP 


Called  8r» 

hEXChZ 


145.  HEXMLT  CALLS  I 

HEXAOO 

ENTPYP 

hxosts 


called  8Y» 

t  JZHX 
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MESAGE 

RITEI 

EXIT? 


1*6.  HEXMOvE  CALLS!  CALLED  BY! 

TRACE  FLY 

MESAGE 

RITEI 

CLIST 

UNPACK 

XTOI. 

NOMUCIT 

FINO0LK 

OROPBLK 

RELEASE 

PACK 

UOLLOAO 


1*7.  HEXMULT 

CALLS! 

CALLED  8YI 

ENTRYP 

ptrand 

ITOJ. 

nomucit 

EXITP 

1*8,  HISTORY 

CALLS! 

CALLED  BY! 

ENTRYP 

UMPIRE 

MESASE 

SHRKILL 

MASKER 

NEAPERC 

TAPE6# 

nEwmove 

OUTCI . 

GNOLOOK 

EXITP 

FLYSEE 

ENGAGE 

DOGFITE 

crfltml 

BAOMOVE 

ATTACK 

1*9. 

HLtPNT 

CALLS! 

CALLED 

BY  I 

ENTRYP 

SECOND 

CONTROL 

MALT 

EXITP 

ISO. 

HOLO 

CALLS! 

calleo 

BY! 

ENTRYP 

OUTS  I » 

REMINO. 

EXITP 

MALT 

131. 

HXOSTS 

CALLS! 

CALLED 

BY! 

ENTRYP 

TM2MX 

EXITP 

TMX2XY 

HEXMLT 

3ETMEX 

152.  HXMLT2 


CALLS! 


153. 

154. 

155. 

156. 


157. 

158. 

159. 

160. 


1 


PA3C  39 


TM2HX 

I J2HX 

I  CHECK 

CALLS 1 

OUTCI • 

calleo  an 

EXITP 

U2HX 

CALLS  1 

HEXMLT 

ENTRTP 

ITOJ. 

EXITR 

CALLED  8Y  * 

XT2MX 

TXT2HXL 

MXNLT2 

INIT 

CALLED  9Y l 

MADE* 

iNtTACQ 

CALLS  * 

ENTRTP 

3IHNE 

A008L0K 

ALOfl. 

MESAQE 

RITEI 

XTOI . 

NOWUC I T 

EX  I  TP 

CALLED  8Y* 

TOwER 

S05ETEN 

INRANGE 

CALLS* 

THH2PS 

ATAN2. 

SORT. 

COS. 

TAPE6# 

OUTCI. 

AZILI* 

calleo  aY* 

8YC0NTC 

CNKCOV 

8YP0NRL 

BYMRTRK 

8NP0N88 

INSECT 

CALLSI 

TAN. 

ATAN2. 

called  3y» 

AZILIM 

INSERT 

calls* 

unpack 

XSMIET 

CALLEO  8Y1 

SSLL 

INTASTN 

CALLS* 

FIN08LK 

TRACE 

MESASE 

RITEI 

CL  I  ST 

UNPACK 

HEXOIST 

TOTHEX 

NE58ILD 

PACK 

OELAOO 

called  Syi 

ASSIGN 
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TAPE6# 
OUTCI  • 
BTNASIN 


PASE 


40 


161.  INTFIND  CALLS  I 

UNPACK 

TAPE6* 

OUTCI. 

FI NO IT 
PACK 
MESBILO 
OELAOO 

162.  InTRFLY  CALLS*  called 

TQTHEX 

HEXOIST 

HES8ILD 

OELAOO 

TAPE6A 

OUTCI. 

UNPACK 

TMM2PS 

ATAN2. 

OPTPTH 

RELEASE 

163.  INT2CRC  CALLS*  CALLED 

UNPACK 

FIN08LK 

RELEASE 

CRCKIL 

TAPE6P 

OUTCI. 

OETECT 

HES8IL0 

OELAOO 

0R0P8LK 

3IMME 

A008L0K 

16*.  IPJL  CALLS! 

LCMLOC 

ISMIFT 

TAPE6P 

OUTCI. 

165.  ISCUHP  CALLS!  CALLED 

OUTCI. 

OUTCR. 


166.  ISHIFT  CALLED 


8YI 

FLITE 


8  V  I 

CRCTHNK 


3YI 

halt 

UNPACK 

PACK 

BY! 

SSLL 

PTREE 

LOSRAOR 
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PA3E  *1 


167.  ITRAP 


168.  JGESUtT 


CALLS  I 


ENTRYP 
THX2XY 
At  AN2. 
EXITP 


CALLED  9Y I 


EXITP 

ENTRYP 

thtrpln 


called  BY I 


CANOTGT 


1 66.  JTJ 


CALLSI 


entryp 

MESAGE 

RITE! 

tSHtrr 

TAPE6* 

outci. 

FSOUMP 

STOP. 

EXITP 


170.  JUGGLE 


171.  KILFUT 


172.  COMPARE 


173.  LCMLOC 


17*.  LINEX 


ENTRYP 

EXITP 


CALLS* 


GINME 

OELAOO 

STOP. 

UNPACK 

RELEASE 

unstat 

fltwype 

FIN08LK 

OROP8LK 


CALLSI 


ENTRYP 

unpack 

PACK 

EXITP 


CALLSI 


CALLED  By  I 


CALLED  By  I 


OESTROY 


called  byi 


THTRPLN 

FINOFLT 


called  BYI 


UNPACK 

RITEP 

PACK 

I’JL 

FSOUMP 

maoEm 


called  BYI 


'•v^S6 


PA3E  *2 


ENTBTP 

EXITP 

OPTPTH 

C0R8OUN 

ITS.  LNPLOT 

CALLS  1 

TAPES# 

OUTCI . 

CALLED  9Tt 

CLIST2 

OUTPTRS 

FSDUMP 

CLIST 

176.  LQADPL 

CALLS* 

ENTBTP 

EXITP 

177.  LOSRAOB 

CALLS* 

ISHIFT 

OPTPTH 

THH2PS 

SQBT. 

COS. 

UNPACK 

RELEASE 

CALLED  9 Y 1 

9YTKCHK 

DETECT 

CBCEVNT 

173.  LBKPBS 

CALLED  By* 

HAOEM 

179.  LTBEE 

CALLS* 

ENTBTP 

BELE4SE 

ltbmbs 

EXITP 

called  by* 

CONTROL 

180.  LTBMR8 

CALLS* 

ENTRYP 

EXITP 

CALLED  9 Y ( 

LTBEE 

OELADO 

181.  NAOEH  CALLS* 

QiNTRY. 

RECC3N 

ENTBTP 

iHPri. 

D8GREA0 

RECOVR 

GOTOER. 

FETCH 

PAGE 

LCMLOC 

fsinit 

othroat 

OISPOAT 

halt 

IN  I  T 

LBKPBS 

RELIST 

OELAOO 

CONTROl 
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182. 

183. 


184. 


EXITP 

ENO. 


PA3E 


MASKER 


MESAGE 


CALLS  I 


TAPES* 

OUTCI. 


calleo 

3YI 

HISTORY 

called 

8Y : 

CLIST2 

EXITP 

ENTRYP 

UNSTaT 

T3THEX 

SELECT 

release 

PACK 

OUTPTRS 

TRKCHEK 

SAMPRCM 

NAYSOR 

JTJ 

INITAC3 

BISTORT 

HEXMOVE 

HEXMLT 

HEXCHZ 

GIMME 

GETHEX 

FLTUVPE 

FTM08LK 

DELADO 

CRCDIES 

CLIST 

I MT  ASI N 


MES0ILO 


callsi 

GIMME 

PACK 


CALLED  8YI 

T0*ER 

BYCONTC 

BSLALLE 

imtrfly 

IMT2CRC 

IMTFINO 

CRC2IMT 

G05ETEM 

FJELCHK 

FLYSEE 

0R0PPS2 

OROPPOS 

OOGTMNK 

OECRALO 

crctrak 

COMMANO 

8YPONRL 

9YPONFO 

9YBONER 

9YMWTRK 


43 


409 


PX3E 


4* 


SYHEDU® 

byconls 
9TRYTNK 
3TNASI N 
90CTINK 
8NPONEO 
9NPONEP 
BMCOnlS 
9NC0NH0 
8NCM0PR 
9AOHOVE 
INTASIN 
4MMOCHK 
ALL08AT 
AIRTHN* 

18S.  NAY80R  CALLS!  CALLED  9Y 1 


UNPACK 

MESAGE 

RITEI 

TRACE 

CLIST 

HEXOIST 

gimme 

oelaoo 

RELEASE 

SELECT 

186.  NEyMOvE 

CALLS* 

EIN09LK 

RANDOM. 

TAPE6* 

OUTCI . 

GIMME 

AOOBLOk 

HISTORY 

OELAOO 

called 

3Y! 

CRCTRAK 

187.  NEHPERC 

CALLS* 

HISTORY 

gimme 

STICK 

OELAOO 

CALLEO 

9YI 

SAMPRCM 

8Y®ASU® 

188.  NOMUCTT 

CALLS! 

ENTRY® 

mEXAOO 

hEXMULT 

gethe. 

3IMME 

A009L0* 

riNDBLK 

OROP9LK 

RELEASE 

EXIT® 

called 

BY  1 

TERHAC3 
I VI  TACO 
HEXMOVE 
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PAGE  *5 


139.  NUK8LN0 

CALLS! 

called 

3Y  1 

: 

UNPACK 

UMPIRE 

GIMME 

HEXAOO 

GETHEX 

TAPE6» 

OUTCI  . 
oelaod 

SAMMYPE 

TERMACQ 

einoblk 

RELEASE 

OPOPSLK 

UNLINK 

ATTACK 

190.  OOTPTh 

CALLS! 

called 

9Y  1 

gimme 

RONOSEE 

THM2P$ 

losraor 

MEXChZ 

intrfly 

LINEX 

CRC2INT 

PACK 

G0T0A9 

elite 

CORBOUN 

ACERAG 

191.  OTHROaT 

called 

9y  l 

MAOEM 

192.  3UTA 

CALLS! 

called 

9Y! 

ENfRYP 

YANK 

TAPE6* 

CHKCOV 

OUTCI. 

ALLOBAT 

EXITP 

accept 

193.  OUTPTSS 

CALLS! 

LNPlOT 

mESAGE 

bitei 

RITEB 

RITE® 

UNPACK 

194.  pack 

CALLS! 

called 

8YI 

ENTS YP 

YANK 

LCMLOC 

MINORA* 

PAGE 

UMPIRE 

MESAGE 

TOMER 

RITCI 

STICK 

trace 

SMRKILL 

ROUTER 

SETASSN 

RITEP 

SECKTAC 

ISOUMP 

SOIGEST 

MALT 

PTPONER 

EXITP 

8YALCOV 
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195. 

196. 

197. 

198. 

199. 


PAGE  CALLS! 

T  APE8# 
OUTCt . 


PATOEC  CAULS  * 

CANC4LD 

SEEXTFU 

pelaoo  cAuusi 

ENTRYP 

GIM*E 

PTRMRG 
EX  I  TP 

PERCEPT  CAUUSI 

GETPTRS 

A8SEE 

CFLYCRC 

SAPSEE 

PLAN  CAUUSI 

ENTRYP 

getptrs 

thtrpun 

EXITP 


PAGE  A6 

PREPAFU 
0 PTPTM 
XES8IU0 
<0*PAPE 
1NTFINO 
*EX*0 YE 
30GETER 
ELY 

FLTRYPE 

FUTGEOM 

ENGAGE 

QLTACT 

CRFLTML 

COKMO 

SY'JPDAT 

9YPONTN 

9YP0NER 

8Y»ASUP 

8TNASIN 

BNRECOV 

9N®ONEb 

8NC0NH0 

INTASIN 

AUL08AT 

ACFRAG 

ACCEPT 

CALUEO  8Y1 

CUIST2 

HALT 

pack 

CUIST 

H40EM 

CALLED  9Y1 

8YALC0V 


CALLED  8YI 

redebrf 

CANOTQT 

AVAlLBL 


CALLED  8Y 1 

select 


CALLED  9YI 

SELECT 


412 


PA3E 


200.  PLANOuT  CAL LSI  CALLEO  9YI 


ENTRYP 

OUT Cl . 

EXITP 

TWTRPLN 

201.  PONOER 

CALLS * 

GETPTRS 

TFLYCRC 

90CTINK 

8TRYTNK 

calleo  av* 

SELECT 

202.  PREPaFU 

CALLS * 

UNPACK 

PACK 

AUTOPRI 

STICK 

RELOCAT 

OELAOO 

CALLED  BY* 

8 YCONTC 
BYPONflL 
BYNPTRK 

203.  PRIORTY 

called  8Y* 

setassn 

cwklast 

8NP0N8B 

9NCONMO 

allobat 

204.  PTPONER 

CALLS* 

UNPACK 

PACK 

CANCALO 

SEEKTFU 

OILOUT 

OELAOO 

CALLED  BY  I 

8YP0 NER 

205.  ptranq 

CALLS* 

UNPACK 

RANDOM. 

HEXAOO 

HEXMULT 

GETWEX 

CALLED  9Y 1 

GOGETEM 

206.  OTREE 

CALLS* 

ENTRYP 

RELEASE 

I SWIFT 

EXITP 

calleo  BY* 

TGTGONE 

CANOTGT 

207.  PTRMR3 

CALLEO  9Y 1 

PELAOO 

208.  REAOIL1 

CALLS* 

UNPACK 

YANK 

STICK 

CALLED  9Y  * 

SEEKTAC 

CANCALO 

8NP0NEP 
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209. 

210. 

211. 

212. 

213. 


TAPES* 

OUTCI. 

RELOCAT 

OELAOO 

RECCON  CALLS* 

T  APES* 
OUTCI. 
aoump 
halt 

RECER  CALLS* 

TAPE6* 

OUTCI. 

OUTCR. 


RECOVR 


RE0E8RF  CALLS* 

UNPACK 

FIN08LK 

HIPEOUT 

SIMMS 

A008LOK 

PELAOO 

DESTROY 

RELEASE  CALLS* 

ENTRYP 

MESASE 

RITEI 

RITEP 

HALT 

3IMME 

EXITP 


PA3E  A8 


CALLED  9Y  * 

maoem 


CALLED  9Y  * 

HALT 

EXITP 

ESTRYP 

OELADD 

CALLED  8 Y I 

MAOEM 

called  8YI 

td*er 


called  8YI 

*  Thora  * 

UMPIRE 

TERMACO 

seektac 

seekeng 

SOISEST 

SAMXYPE 

SAMSEE 

SAMATON 

RONOSEE 

RL**VE 

RLTGTYP 

rltgta* 

rlraio 

RLFMAKT 

RLCORD 

RLA808 

REVISE 

RELSILL 

RELIST 

PTREE 

BYALCOV 

NUK8LN0 

SAMPRCM 

VO*UC I T 


414 


N4Y80R 
L  TREE 
LOSRAOS 

kilflit 

IMTRFLY 

1ST2CRC 

CRCZINT 

HEXMOVE 

G0T0A8 

FORMTGT 

FUYSEE 

futwype 

FUITE 

FELOEt 

ENGAGE 

DROPPS2 

OROPPOS 

0R0P8L< 

OU.OUT 

DESTROY 

CRCTHNK 

CRCSEE 

CRCKIL 

CRCEVNT 

CRCOIES 

COVAPUY 

CONTROL 

COMNO 

CN4CTT* 

CANCALO 

BYUPOAT 

8YP0NTN 

BYPONRS 

BYPONFD 

0YPONER 

BYHEDUP 

8YEN0PS 

9YCMDPR 

BTN2CRC 

8TNASIN 

BOCTINK 

BNPONFO 

9NPONDA 

9NPON80 

9NNOTRO 

BNCONMO 

8ATTOUT 

BATCEAS 

BAOMOVE 

AVAtLBL 

ACFRaG 

ACCEPT 

A9SEE 

A  92 CSC 


415 


214 

215. 

216. 


217. 

218. 

219. 

220. 

221. 


PA3E 


50 


relist 

CALLS! 

ENTRYP 

RELEASE 

EXITP 

CALLED  3Y! 

maDEM 

RELOAD 

CALLS! 

3IMME 

30T0ER. 

OELAOO 

RESUPLY 

CALLED  3Y I 

9YOQNRS 

RELOCAT 

CALLS! 

YANK 

STICK 

CALLED  8yi 

TOADIL 

setassn 

SAMATOV 

READIL 

prepafu 

mavozpt 

3YC0NTC 

CHKLAST 

BYVMTRK 

9YMEDUP 

8YC0NHD 

3MPQN83 

RELSIUL 

CALLS! 

RELEASE 

RENOEvU 

CALLS! 

UNPACK 

THX2XY 

TXY2MXL 

CALLED  3 Y ! 

SCHEDUL 

RESUPLT 

CALLS! 

GIMME 

OELADD 

CALLED  3Y! 

RELOAD 

REVISE 

CALLS! 

ENTRYP 

GIMME 

ABVSCOP 

RELEASE 

EXITP 

CALLED  BY! 

TMTRPLV 

RITEI 

CALLS! 

TAPES* 

OUTCI. 

CALLED  3YI 

CLIST2 

malt 

EXITP 

EVTRYP 

TSTHEX 

SELECT 

RELEASE 

PACK 

OUTPTRS 
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TRKCHEK 

NAYBOR 

JTJ 

INITACO 

HEXMOVE 

hexmlt 

3t«ME 

SETHEX 

PLtNYPE 

PINDBLK 

CRCOIES 

CLIST 

I  NT  AS  IN 


222.  9 1 TEP 


223.  9 1 TEP 


224.  RLA809 


225.  91C0RD 


226.  RlPMAKT 


227 •  RLRaIO 


2*5.  SELECT 


CALLSI 

LCMLOC 
TAPE6# 
OUTCI . 


CALLS: 

TAP£6« 

OUTCI. 


CALLS: 

ENTRYP 
RELEASE 
EX  I  TP 

CALLSI 

ENTRYP 
RLA308 
RELEASE 
EX  I  TP 

calls: 

ENTRYP 
RELEASE 
EX  I  TP 

CALLSI 


calls: 


CALLEO  9y: 

CLIST2 

UNRACK 

RELEASE 

PACK 

OUTPTRS 

SANPRCM 

NEXCMZ 

GINHE 

CLIST 


CALLED  9Y : 

CLIST2 

HALT 

OUTPTRS 

PSDUMP 

CLIST 

CALLED  By: 

RLCORD 


CALLED  BY1 

RLRAIO 


CALLED  3Y : 

RLTGTAK 


CALLED  9YI 


9YPONER 

BATCEA5 


called  by: 
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246. 

247. 

248. 

249. 

250. 

251. 
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ENTRYP  CONTROL 

GOTOER. 

MESAGE 

RITEI 

HALT 

FELOEL 

ASSI8N 

ATTACK 

comho 

OOGFITE 

engage 

FLY 

NAYBOR 

PERCEPT 

PLAN 

PONOER 

TOMER 

UMPIRE 

TAPE6* 

OUTCI. 

OUTCR. 

EXITP 


SETASSN 

calls* 

unpack 

PACK 

STICK 

priorty 

relocat 

OELAOO 

CALLED  BY  1 

3NCONTC 

9NP0N0A 

BNP0N88 

bnnmtrk 

shrkil'l 

CALLS* 

ALOG. 

RANOOM. 

HISTORY 

UNPACK 

TAPES# 

OUTCI. 

GIMME 

PACK 

OELAOO 

OESTROY 

called  by* 

FLY 

ATTACK 

shuffle 

called  8v  > 

TH2HX 

SKSBTRK 

CALLS* 

UNPACK 

SEEKP 

CALLED  BY* 

BNPONEP 

Snap 

CALLS* 

ENTRYP 

EXITP 

CALLED  9r* 

OELAOO 

CONTROL 

SSLL 

CALLS* 

CALLED  9Yt 

418 


UNPACK 

ISHIFT 

INSEPT 


*THORA«r 

SEEKTAC 

SEEKENQ 

8TALCOV 

aruPDAT 

8ATTOUT 


252.  SfATPAK  CALLED  9y! 

TFLYCRC 

RONOSEE 

FLY 

CFLTCRC 

ATTACK 


253.  STICK 


CALLS! 

UNPACK 

PACK 


CALLED  3Y! 

TOADIL 

SETASSN 

S0I6EST 

PEADIL 

PREPAFU 

TRKCHEK 

aELOCAT 

HANOZPT 

NEKPERC 

BTTKCHK 

8 YCDNTC 

8NLALLE 

8NC0NTC 

FILERUP 

DLTACT 

9YNHTRK 

BTCONhO 

8NPONE® 

8NOON88 

8NC0NH0 

SATCEAS 

allOpaT 

ALLOFU 

ALL08AT 

ACCEPT 


TEPNAC3 

CALLS! 

UNPACK 

XTOI. 

NOKUCIT 

RELEASE 

CALLEO  3Y 1 

NUK8LN0 

OESTPOr 

TFLYCRC 

CALLS! 

CRCTHNK 

unstat 

ajrthnk 

DOGTHNK 

STATPAK 

CALLED  9Y 1 

PONDER 

254.  TGTQOnE 


CALLS! 


CALLED  BY! 


C4N0TGT 


P43E  57 


257. 


258. 


259. 


260 


ENTRYP 
PTBEE 
GIMME 
EX  I  TP 


TGTHEX  CALLS  I 

TRACE 

mesaqe 

RITEI 

CLIST 

UNPACK 

TMH2PS 

ATAN2. 

COS. 

SORT. 

Sin. 

TXY2HXL 


THH2PS  CALLSI 

ENTRYP 

THX2XY 

EXIT* 


CALLED  8 Y ! 

INTRFLY 
8AOMOVE 
I MTAS I N 

atrthnk 


CALLED  9YS 

UMPIRE 

TGTHEx 

rondsee 

OPTPTM 

trkchek 

inrange 

LOSRAOR 

intrfly 

CRC2INT 

GOTO A0 

GNOLOOK 

FLTGEOM 

OETECT 

CORBOUN 

COMMAND 

ATKASES 


ThTRPLN  CALLSI 

ENTRYP 

C0R80UN 

REVISE 

FINOBLK 

KOMPARE 

CANOTGT 

ttrap 

AVAILBl 

SCHEOUL 

OELAOO 

planout 

RLRAID 

EXITP 


TMX2XY  CALLSI 

ENTRYP 

HXDGTS 

juggle 


CALLED  3YI 

plan 


called  8Y I 

TMM2PS 

RENOEVU 

JGESUIT 


420 


P*se  59 


PA3E  59 


ritei 

CLIST 

FSOUMP 

STICK 

TQAOIL 

8NL ALLE 

-266.  TRPRMT 

CALLED  8Y 1 

TRACE 

267.  TRPRNt 

CAULS  1 

TAPE6* 

OUTCI . 

CALLED  9Y) 

TRACE 

268.  TRPRRT 

CALLED  8 Y ) 

TRACE 

269.  TRYSHOT 

CALLS) 

8OT0EB. 

TAPE6A 

OUTCI. 

YANK 

8ATCEAS 

8NLALLE 

EIRECHK 

CALLED  3y ) 

ENGAGE 

9YP0NTM 

270.  TXY2MX 

CALLS) 

ENTRYP 

EXITS 

• 

271.  TXY2MXL 

CALLS) 

ENTRYP 

COS. 

SIN. 

XTOI. 

CENTER 

IJ2MX 

GETMEX 

EXITP 

CALLED  By ) 

TGTHEX 

RENOEVU 

CORBOUN 

272.  UMPIRE 

CALLS) 

unpack 

TMH2PS 

SORT. 

XTOI. 

HISTORY 

RANOOM. 

TAPE6# 

OUTCI. 

gimme 

PACK 

OELAOO 

OESTROY 

RELEASE 

NUK8LNO 

CALLED  BY ) 

SELECT 

422 


273, 

274. 
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unlink 

CALLS! 

UNPACK 

called  by) 

NUKBLNO 

OESTROY 

unpack 

CALLS) 

ENTRYP 

LCMLOC 

RITEP 

I  SOU  HP 

HALT 

EXITP 

called  byi 

YANK 

MTHORAM 

UNSTAT 

unlink 

UMPIRE 

TOMER 

T3TMEX 

TERMACQ 

STICK 

SSLL 

SKS8TRK 

SURKILL 

setassn 

SEEKTaC 

SOIGEST 

SCHEDUL 

SAHMYpF 

SANATON 

ROnOSEE 

renoevu 

REOEBRF 

reaoil 

ptrano 

PTPONER 

byalCov 

PREPAFU 

OUTPTRS 

RUKBl.NO 

3YC0NTC 

NAYSOR 

LOSRAOR 

KOMPARE 

KIUFUT 

INTRFLY 

INT2CRC 

INTFINO 

CRC2INT 

INSERT 

HEXMOVE 

qqtoab 

90GETEM 

GNOLOOK 

FUELCHK 

FLTMYPE 

F1.ITE 

FElOEU 

ENGAGE 

DLYACT 

OILOUT 
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DETECT 

CRFLTML 

crctrak 

crcthnk 

CRCSEE 

CRCLOSS 

CRCKIL 

CRCEVNT 

CRCDIES 

COMMO 

COMHANO 

CHKCOV 

BYUPDAT 

BYPONTm 

BY°ONRS 

8YPONRL 

BYOONER 

9YPASUP 

3YNOTRO 

3YHEQUP 

BYENDPS 

BTN2CRC 

BTNASIn 

3NREC0V 

3NPONSS 

BNPOnER 

BNPONDa 

3NP0NBB 

3ATTOUT 

BATCEAS 

BADMOVE 

INTASIN 

acfrag 

ACCEPT 

A3SEE 

A32CRC 


275. 

UNSNAS 

CAU.S1 

called 

BY  l 

ENTRYP 

FELOEL 

EXITS 

control 

276. 

UNSTAT 

CALLS  1 

CALLED 

BY  1 

TRACE 

tflycrc 

MESA3E 

RONDSEE 

CLIST 

KIlFlIT 

FSOUMP 

fly 

STOP. 

D05FITE 

UNPACK 

DESTROY 

CFLYCRC 

attack 

277. 

UOLLOAO 

CALLSI 

called 

by: 

Entryp 

to«er 

GIMME 

mexmove 

ADD0LOK 

SOGETEM 

424 


EXITP 


278.  WIPEOUT 


279.  hTHORaK  CAULS  t 

UNPACK 

GIHmE 

PACK 

SSLL 

OECRALO 

SEEKENG 

OLYACT 

9ELEASE 


280.  XPAA 


281.  XpO 


282,  XPK 


PAGE 


CALLED  971 

REDE8RF 

CALLED  BY  t 

9NREC0V 


CALLED  3Y : 

ODGFITE 

CALLED  3Yt 

GNOLOO* 

CALLED  3Yt 

ATTACK 


283.  XSHIFT 

CALLED 

3Y  : 

INSERT 

284.  XY2HX 

CALLS  1 

CENTER 

IJ2H* 

285.  yank 

CALLS  1 

CALLED 

by  i 

unpack 

TRYSHOT 

TAPE6P 

TOADIL 

OUTCI. 

SEEKTAC 

TRACE 

SDIGEST 

ODTA 

RE  AD  I L 

FSDUKP 

TRKCHEK 

STOP. 

SANPRCK 

PACK 

RELOCAT 

HANDZPT 
9  YTKCHK 
3YCONTC 
9NLALLE 
BNCONTC 

filerup 

0R0PPS2 

OROPOOS 

D I  LOUT 

CNACTTK 

CANCALO 

8YP0NF0 

9YENQPS 

3TRYTNK 

9YPONFO 


32 
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9NP0NEP 
8NPONOA 
8  SCONHO 
8ATT0UT 
ALLOBAT 


426 
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PA3E 


1.  AlOG.  CALLED  9 Y 1 

SHRKILL 

IRITACQ 

2.  AStN.  CALLEO  3Yt 

FtRECHK 

3.  AT AN2 .  CALLED  BY  I 

tsthex 

ROnOSEE 

trkchek 

iyrange 

bytkcmy 

J3ESUIT 

mRFLY 

CRC2IIYT 

I YSECT 

SOTOAB 

GMDLOOX 

FLTGEOH 

FIRECMK 

DETECT 

COHMANO 

ATKASES 

A.  COS.  CALLED  3Y1 

TXY2HXL 

TGTMEX 

I  GRANGE 

L3SRAOR 

FIRECHK 

DETECT 

CRCEVNT 

CORSOUY 

AZILIM 

5.  DECOD  I .  CALLED  BY  I 

D8GREA0 

6.  EsOFIl.  CALLED  BY! 

HALT 

t.  eho.  called  byi 

HADEH 

8.  GOTOER.  CALLED  BY! 

TRYSHOT 

SELECT 

SahkyPE 

RELOAO 

COHHANO 


84 
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BYPONRL 

8NP0NSS 

3NP0NEB 

3NP0NDA 

9NP0NB9 

BHCMOPR 

AN*»OCH« 

haOEm 

9.  INP81.  CALLED  BY  I 

FETCH 

10.  INPCI.  CALLED  9YI 

08SREA0 

11.  INPFI.  CALLED  BY1 

MAOEM 


12.  ITOJ.  CALLED  BY! 

I J2MX 

hExmult 

hEXInv 

HEXAOD 

dgtsmx 

13.  OUTBI.  CALLED  BY  I 

HOLD 

l*.  out c i .  called  byi 

CLIST2 

ISDUMP 

halt 

aOump 

D9GREA0 

ICHECK 

OISPPYB 

DISPPRO 

OISPPAY 

OISPPAF 

OISPFMF 

dispflt 

DISPFD9 

DISPAQO 

OISPaOS 

OISPACR 

OISPACL 

OtSPACO 

01SPA63 

OISPOAT 

EX  I  TP 

ENTRYP 

ENTSTAT 

ROUTER 

RECER 

RECCON 


428 


PA3C 


YANK 

UMPIRE 

TRYSHOT 

trprrt 

TOMER 

TOAOIL 

SHRKILL 

SELECT 

SOIGEST 

SARATOV 

RONDSEE 

HITER 

RITEP 

RITE  I 

REAOIL 

8YALCOV 

planout 

PAGE 

OUTA 

RUKBlNO 

IRRAnGE 

REMHOVE 

8RC0NTC 

mESAGE 

lrrlot 

JTJ 

I»JL 

IRTRFLY 

irtzcrc 

INTE1NO 

crchirt 

HISTORY 

GOGETEH 

GHOLOOK 

EUELCHX 

F30UMP 

FLYSEE 

Fly 

FIlERUP 

FELDEL 

ENGAGE 

DOGTHN* 

OOGFITE 

DETECT 

DESTROY 

DECRALD 

CRCTRA* 

CRCKIL 

CRCEVNT 

COMMAND 

CLIST 

CHUCOV 

CARCALO 

8YPONTM 

BYPONRS 
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PA3E  ST 


BY*ONRl 

BYMOTRO 

BYCONHO 

3YCM0PR 

BTRYTNK 

8TM2CRC 

3TNASIN 

BOCTINK 

byponfd 

BMPONFa 

8NP0NB0 

BRP0N88 

BMNOTRO 

BNCONHO 

IYTASIm 

ATKASES 

ammochk 

allopat 

ALLOFU 

AU.O0AT 

airthnk 

ACCEPT 

ABSEE 

AB2CRC 

15.  OuTCR.  CALLED  By i 

CUST2 

ISDUMP 

AOUHP 

ROUTER 

RECER 

SELECT 

FSOUMP 

CL  I  ST 


INTRY. 

CALLED 

BY  I 

MAOEM 

ANOOM. 

calleo 

BY  1 

UMPIRE 

SMRKIUL 

SOIGEST 

SCHEDUL 

PTRANO 

NEMMOVE 

gsolook 

filerup 

dogfite 

DETECT 

CRCTRAK 

crcevnt 

CAN0T3T 

ATTACK 

AIRTHNK 


430 


P43E 


S8 


18.  REMIND. 

CALLEO 

ay  i 

hold 

29.  SIN. 

called 

9y  » 

TXT2HXL 

T3THEX 

PLITE 

EIRECHK 

COR80UN 

AZILIM 

20.  soar.  called  3yi 

UMPIRE 

T3THEX 

TRXCHE* 

IMRANSE 

3YTKCMK 

L0SRAOR 

PIRECHK 

aZILIm 

21.  STOP.  CALLEO  BY ! 

malt 

YAW 
UNSTAT 
K  I  LFI  IT 
UTJ 

ACCEPT 

22.  tan.  CALLED  by: 

INSECT 

23.  T APEb*  CALLED  9Y I 

CLIST2 

EX  I  TP 

ENfRYP 

ENTSTAT 

ROUTER 

»ECER 

RECCON 

YANK 

UMPIRE 

TRYSHOT 

TRPRNT 

TOPER 

TOAOIL 

SMRKILL 

SELECT 

S01GEST 

SAMATON 

RONOSEE 

RITER 

RITEP 

R5TEI 
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REAOIL 

syalcov 

PAGE 

OUT* 

NUOLNO 

ivrangs 

NEPMOVE 

8NC0NTC 

HE5AGE 

L'rfPLOT 

JTJ 

IPJL 

INTRFLY 

IYT2CRC 

1  *4TF  INO 

CRC2INT 

HISTORY 

gogeter 

GNOLOOK 

FUELCHK 

FSOUMP 

F1.YSEE 

FLY 

FIlERUP 

FELOEL 

engage 

oogthnk 

OOGFITE 

OETECT 

DESTROY 

oecralo 

CRCTRA< 

CRCKIL 

CRCEVNT 

CORHANO 

CL  1ST 

CHKCOV 

CASCALO 

8YP0NTR 

BYPONRS 

8YP0HRL 

8YX0TR0 

8YC0NM0 

8YCMOPR 

BTRYTNR 

8TN2CRC 

3TNASIH 

SOCTINR 

BSPOnFO 

SMPONF a 

8NP0NB0 

8HPON83 

3NN0TR0 

3SC0NH0 

IMTASIN 


432 


PA3E  70 


ATKASES 

AMMOCHK 

ALLOPA7 

ALLOBAT 

airthn* 

accept 

A9SEE 

A8ZCRC 

CALLED  BY  t 

UMPIRE 

TXYEHXL 

TERHAC3 

INITAC3 

HEXHOVE 


433 


00001 

00002 

00003 

00004 

00005 

00006 

00007 

00008 

00009 

00010 

00011 

00012 

00013 

00014 

00015 

00016 

00017 

00018 

00019 

00020 

00021 

00022 

00023 

00024 

00025 

00026 

00027 

00028 

00029 

00030 

00031 

00032 

00033 

00034 

00035 

00036 

00037 

00038 

00039 

00040 

00041 

00042 

00043 

00044 

0004S 

00046 

00047 

00048 

00049 

00050 

00051 

OOOS2 


•uoe*  subroutine  calling  hierarch y  - 


PA3E  71 


1.  HAOEH 

2  31NTRY. 

2.  RECCON 

3.  TAPE6* 

3.  OUTCI. 

3.  AOUMP 

4.  OUTCI. 

4.  OUTCP. 

3.  HALT 

4.  HOLO 

5.  ENTRYP 

6.  MESASE 

7.  TAPES* 

7.  OUTCI. 

6.  RITEI 

7.  TAPES* 

7.  OUTCI. 

6.  RECER 

7.  TAPES* 

7.  OUTCI. 

7.  OUTCR. 

6.  TAPE6* 

6.  OUTCI. 

6.  ROUTER 
7.  TAPES* 

7.  OUTCI. 

7.  OUTCR. 

6.  ITRAP 

7.  HALT  <SEE:  LINE  00009) 

6.  SECONO 

5.  0UT8I . 

5.  REWINO. 

5*  EXITP 


6. 

SECONO 

6. 

MESA3E 

(SEE 

LINE 

00012) 

6. 

RITEI 

(SEE 

LINE 

00015) 

6. 

RECER 

(SEE 

LINE 

00018) 

6. 

TAPE6* 

6. 

OUTCI. 

6. 

ITRAP 

(SEE 

LINE 

00028) 

6. 

ICHECK 

7.  OUTCI. 

4.  OUTCI. 

4.  RITEP 

5.  TAPE6* 

5.  OUTCI. 

4.  RITEI  (SEE  LINE  00015) 

4.  TRACE 

5.  TRPRRT 
5.  TRPRMT 
5.  TRPRNT 

6.  TAPE6* 


434 


00053 

6. 

OUTCI. 

00054 

4.  PECEP 

(SEE  LINE  00018) 

00055 

4.  ENISTAT 

OOOS6 

5.  TAPE6# 

00057 

5.  OUTCI. 

00056 

4.  CLIST 

00059 

5.  PAGE 

00060 

&. 

TAPE66 

00061 

6. 

OUTCI . 

00062 

5.  LNPLOT 

00063 

6. 

TAPE66 

00064 

6. 

OUTCI. 

00065 

5.  MESAGE 

(SEE  LINE  00012) 

00066 

5.  9TTEP 

00067 

6. 

LCMLOC 

00066 

6. 

T  APE  6# 

00069 

6. 

OUTCI. 

00070 

5.  PITER 

(SEE  LINE  00044) 

00071 

5.  RITEI 

(SEE  LINE  00015) 

00072 

5.  TAPE6* 

00073 

5.  OUTCI. 

00074 

5 .  OUTCR. 

00075 

5.  CLIST2 

00076 

6. 

PAGE 

(SEE  LINE  00059) 

00077 

6. 

LNPLOT 

(SEE  LINE  00062) 

00078 

6. 

MESAGE 

(SEE  LINE  00012) 

00079 

6. 

RITEI 

(SEE  LINE  00015) 

00080 

6. 

RITER 

(SEE  LINE  00044) 

00081 

6. 

TAPE6A 

00082 

6  • 

OUTCI  . 

00083 

6. 

OUTCR. 

00084 

6. 

RITEP 

(SEE  LINE  00066) 

00085 

4.  PAGE 

(SEE  LINE  00059) 

00086 

4.  AOU*P 

(SEE  LINE  00006) 

00087 

4.  IS0U9P 

00088 

5.  OUTCI. 

00089 

5.  OUTCR. 

00090 

4.  ENOEll. 

m 

00091 

4.  STOP. 

00092 

2. 

ENTRTP 

(SEE  LINE  00011) 

00093 

2. 

INPFI. 

00094 

2. 

093REA0 

00095 

3.  OUTCI. 

00096 

3.  INPCI. 

00097 

3.  EOF 

00098 

3.  OECOOI. 

00099 

2. 

RECOVR 

00100 

2. 

30T0ER. 

00101 

2. 

FETCH 

00102 

3.  enTptp 

(SEE 

LINE  00011) 

00103 

3.  I NPB I . 

00104 

3.  EX  I  TP 

(SEE 

LINE  00033) 

00105 

2. 

PAGE 

(SEE  LINE  00059) 

00106 

2. 

LCNLOC 

00107 

2. 

FSINIT 

72 


435 


ooioa 

2. 

3THP0AT 

00109 

2. 

0ISPO4T 

00110 

3.  OUTCI. 

00111 

3.  0150405 

00112 

*-  OUTCI. 

00113 

3.  QISPFOB 

00114 

4.  OUTCI. 

00115 

4.  OISPFMF 

00116 

5.  OUTCI. 

00117 

5.  DISPFLT 

00118 

6.  OUTCI. 

00119 

6.  0ISPO4Y 

00120 

7. 

OUTCI. 

00121 

7. 

OISPOYB 

00122 

8.  OUTCI. 

00123 

6.  OISP4QO 

00124 

7. 

OUTCI. 

00125 

6.  0ISP4C0 

00126 

7. 

OUTCI. 

00127 

6.  0ISPOP0 

00128 

7. 

OUTCI. 

00129 

3.  OISPFLT 

(SEE  LINE  00117) 

00130 

3.  OtSPACO 

(SEE  LINE  00125) 

00131 

3.  0ISPO4F 

00132 

4.  OUTCI. 

00133 

4.  0 1  SPOTS 

(SEE  LINE  00121) 

00134 

3.  OISPPPO 

(SEE  LINE  00127) 

00135 

3.  0TSPA30 

(SEE  LINE  00123) 

00136 

3.  OISPABQ 

00137 

4.  OUTCI. 

00138 

3.  OISPACP 

00139 

4.  OUTCI. 

00140 

4.  OISPACL 

00141 

5.  OUTCI. 

00142 

2. 

8Ai_T  (SEE  LINE  00009) 

00143 

2. 

I  91 T 

00144 

2. 

LP<PPS 

00145 

2. 

PEL  I  ST 

00146 

3.  EnTPYP 

(SEE  LINE  00011) 

00147 

3.  PELEASE 

00148 

4.  ENTPYP 

(SEE  LINE  00011) 

00149 

4.  XESA3E 

(SEE  LINE  00012) 

00150 

4.  PITEI 

(SEE  LINE  00015) 

00151 

4.  PITEP 

(SEE  LINE  00066) 

00152 

4.  HALT 

(SEE  LINE  00009) 

00153 

4.  GINNE 

00154 

5.  ENTPYP 

(SEE  LINE  00011) 

00155 

5.  HALT 

(SEE  LINE  00009) 

00156 

5.  NSSAGE 

(SEE  LINE  00012) 

00157 

5.  PITEI 

(SEE  LINE  00015) 

00158 

5.  PITEP 

(SEE  LINE  00066) 

00159 

5.  EXITP 

(SEE  LINE  00033) 

00160 

4.  FXITO 

(SEE  LINE  00033) 

00161 

3.  EXITP 

(SEE  LINE  00033) 

00162 

2. 

OELAOO 

73 


436 


PA3E 


7* 


00163 

3. 

EK7RYB 

(SEE  LIKE  00011) 

00164 

3. 

HESAGE 

(SEE  LIKE  00012) 

00165 

3. 

7RACE 

(SEE  LIKE  00048) 

00166 

3. 

RECE9 

(SEE  LIKE  00018) 

00167 

3. 

ginnE 

(SEE  LIKE  00153) 

00168 

3. 

SNAP 

00169 

4.  2N7RYP 

(SEE  LIKE  000 

00170 

4.  EXITS* 

(SEE  LIKE  000 

00171 

3. 

ltrmrg 

00172 
00 1  73 
00174 
00175 
00176 


0020T 
00209 
00209 
00210 
00211 
00212 
00213 
00216 
00215 
00216 
0021  7 


4.  EKTRYP 

6.  exits 
3.  exiTo 

2.  control 

3.  ENTRY® 


l SEE  Line  000111 
( SEE  LINE  000331 
(SEE  LINE  000331 

(SEE  LIKE  OOOltt 


0017T 

3.  LTREE 

001T8 

4. 

EN7RYP 

(SEE 

LINE  00011) 

00  179 

4. 

RELEASE 

(SEE 

LIKE  00147) 

00180 

4  • 

ltrkrs 

(SEE 

LIKE  00171) 

00191 

4. 

EXITS 

(SEE 

LIKE  00033) 

00102 

3.  SELECT 

00193 

4  % 

EK7RYP 

(SEE 

LINE  00011) 

00184 

6. 

8070ER. 

00185 

4. 

hESAGE 

(SEE 

LINE  00012) 

00186 

4. 

RITEI 

(SEE 

LINE  00015) 

00137 

6. 

halt 

(SEE 

LINE  00009) 

00  180 

4. 

EELOEL 

00189 

5.  UNPACK 

00190 

6.  ENTRyP 

(SEE'  LINE 

00011) 

00191 

6.  UCMLOC 

00192 

b.  RITE® 

(SEE  LINE 

00066) 

00193 

6.  I SOUXP 

(SEE  LINE 

00087) 

00194 

6.  HALT 

(SEE  LINE 

00009) 

00195 

6.  EXITP 

(SEE  LINE 

00033) 

00196 

5.  UNSNAP 

00197 

6.  ENTRYP 

(SEE  LINE 

00011) 

00198 

6.  EXIT® 

(SEE  LIKE 

00033) 

00199 

5.  RELEASE 

(SEE  LIKE  00167) 

00200 

5.  TAPE6# 

00201 

5.  OuTCl  • 

00202 

ASSI3K 

00203 

5.  3ETPTRS 

00204 

6,  ENTRTP 

(SEE  LINE 

00011) 

00205 

6,  EXITP 

(SEE  LINE 

0003 3) 

00206 

S,  IKTASIK 

6,  FIND8LK 
7,  EVTSYB 
7.  ROUTER 
7.  *S543£ 
7.  RITE! 

r.  cirsr 

t.  exit* 

6.  TRACE 
6.  HESASE 
4.  R1TE1 
6.  CL1S7 


I  SEE  LIKE  0001  1) 
(SEE  LIKE  00024) 
I  SEE  LIKE  00012) 
(SEE  LIKE  00015) 
(SEE  LIKE  00058) 
(SEE  LINE  00033) 
(SEE  LIKE  000*8) 
(SEE  LIKE  00012) 
(SEE  LIKE  00015) 
(SEE  LIKE  00058) 
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00218 

00219 

00220 

00221 

00222 

00223 

0022* 

00225 

00226 

00227 

00228 

00229 

00230 

00231 

00232 

00233 

0023* 

00235 

00236 

00237 

00239 

00239 

002*0 

002*1 

002*2 

002*3 

002** 

002*5 

002*6 

002*7 

002*8 

002*9 

00250 

00251 

00252 

00253 

0025* 

00255 

00256 

00257 

00258 

00259 

00260 

00261 

00262 

00263 

0026* 

00265 

00266 

00267 

00268 

00269 

00270 

00271 

00272 


6.  UNPACK  (SEE  LINE  00189) 

6.  HEXOIST 
6.  T3THEX 


7. 

TRACE 

(SEE 

LINE 

000*6) 

7. 

hESaSE 

(SEE 

LINE 

00012) 

7. 

ritei 

(SEE 

LINE 

00015) 

7. 

CLIST 

(SEE 

LINE 

00058) 

7. 

UNPACK 

(SEE 

LINE 

00189) 

7. 

THM23S 

8.  entryb  (SEE  line  ooom 

8.  79X2X7 


9.  ENTRYP 

(SEE  LINE  000 

11) 

9.  HX03TS 

10.  ENTRYP 

(SEE  LINE 

00011) 

10.  EXITP 

(SEE  LINE 

00033) 

9.  JJGSLE 

10.  ENTRYP 

(SEE  LINE 

00011) 

10.  EXITP 

(SEE  LINE 

00033) 

9.  EXITP 

(SEE  LINE  000 

33) 

EXITP' 

(SEE  LINE  00033) 

7.  ATAN2, 

7.  COS. 

7.  SORT. 

7.  SIN. 

7.  TXY21XL 

8.  ENTRyp  (SEE  LINE  00011) 

8.  COS. 

8.  SIN. 

8.  X  TO  I . 

8.  CENTER 


9.  ENTRYP 

(SEE  LINE  00011) 

9.  EXITP 

(SEE  LINE  00033) 

8.  IJ2HX 

9.  HEXNLT 

10.  9EXA00 

11.  ENTRYP 

(SEE  LINE  0 00 1  1  ) 

11.  ITOJ. 

11.  EXITP 

(SEE  LINE  00033) 

10.  ENTRYP 

(SEE  LINE  00011) 

10.  9X03TS 

(SEE  LINE  00230) 

10.  «ESaSE 

(SEE  LINE  00012) 

10.  RITEI 

(SEE  LINE  00015) 

10.  EXITP 

(SEE  LINE  00033) 

9.  ENTRYP 

(SEE  LINE  00011) 

9 .  I TOj. 

9.  EXITP 

(SEE  LINE  00033) 

8.  GETMEX 

9.  ENTRYP 

(SEE  LINE  00011) 

9.  HX03TS 

(SEE  LINE  00230) 

9.  NESA3E 

(SEE  LINE  00012) 

9.  RITEI 

(SEE  LINE  00015) 

9.  31 NNE 

(SEE  LINE  00153) 

9.  SCHTA8 

10.  ENTRYP 

(SEE  LINE  00011) 

10.  EXITP 

(SEE  LINE  00033) 
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9.  EXIT®  (SEE  LINE  000 

00274- 

8.  EXITS. 

(SEE  LINE  00033) 

00275 

6.  MES8IL0 

00276 

7.  GIMmZ 

(SEE  LINE  00153) 

00277 

7.  PACK 

00278 

9.  E 978 r B 

1  SEE  LINE  0001  1  ) 

00279 

8.  LC91.DC 

00280 

8.  P»3E 

1  SEE  LINE  00059) 

00261 

8.  *ES43E 

1  SEE  LINE  000  12! 

00282 

8.  RITE! 

(SEE  LINE  0 00 1 5) 

00283 

8.  TRACE) 

(SEE  LINE  000*8) 

0028* 

8.  ROUTER 

(SEE  LINE  0002*) 

00285 

8.  BITEB' 

(SEE  LINE  00066) 

00286 

8.  tSDURB 

(SEE  LINE  000871 

00287 

8.  HALT 

(SEE  LINE  00009) 

00288 

a.  exits* 

(SEE  LINE  00033) 

00289 

6.  PACK 

(SEE  LINE  00277) 

00290 

6.  0EL400 

(SEE  LINE  00162) 

00291 

6.  TAPE6* 

00292 

6.  OUTCI. 

00293 

6.  8TNASIN 

0029* 

7.  UnPaC< 

(SEE  LINE  00189> 

00295 

7.  PTN03LK 

(SEE  LtNE  00207) 

00296 

7.  PACK 

(SEE  LINE  00277) 

00297 

7.  MgXDIST 

00298 

7.  RELEASE 

(SEE  LINE  001*7) 

00299 

7.  0R0P9LK 

00300 

a.  cvroro 

(SEE  line  oocui 

00301 

a.  release  I  SEE  lI9E  001*7) 

00302 

a.  EXITS 

(SEE  LINE  00 033) 

00303 

7.  NES8IL0 

(SEE  LINE  00275) 

0030* 

7.  0ELA5O 

(SEE  LINE  00162) 

00305 

7.  tapes* 

00306 

7.  OUTCI. 

00307 

♦.  ATTACK 

00308 

5.  SETBTRS  ! SEE'  LIKE  00203) 

00309 

5,  UVSTAT 

00310 

4.  TRACE 

1  SEE  LINE  000*8) 

00311 

4.  kESaOE  i 

[SEE  LINE  00012) 

00312 

S.  CLIST  l 

[SEE  LINE  0Q0S8) 

00313 

S.  FSDUNP 

0031* 

7.  EKTR7B 

(SEE  LINE  00011) 

00315 

7,  TRACE 

(SEE  LINE  000*8) 

00316 

7.  ENTS74T 

(SEE  LINE  00055) 

00317 

7.  CLIST 

(SEE  Lt‘iE  00058) 

00316 

7,  RITER 

(SEE  LINE  000**) 

00319 

7.  LNPlDT 

(SEE  LINE  00062) 

00320 

7,  LCH13C 

00321 

7.  TAPES* 

00322 

T.  OUTCI. 

00323 

7.  OUTCR. 

0032* 

7.  EXIT*' 

(SEE  LINE  00033) 

00325 

6.  STOP. 

00326 

4.  UNPACK  f 

SEE  LINE  00189) 

00327 

5.  SHRKILL 
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00  328 

6. 

ALOG. 

00329 

6. 

RANDOM. 

00330 

6. 

HISTORY 

00331 

7.  ENTRY3  ( 

SEE  LINE  00011) 

00332 

7.  MESA3E  ( 

SEE  LINE  00012) 

00333 

7.  MASkER 

0033* 

7.  TAPES* 

00335 

7.  OUT C I  • 

00336 

7.  EXIT3'  ( 

SEE  LINE  00033) 

00337 

6. 

UNPACK  (SEE 

LINE  00189) 

00338 

6. 

TAPES* 

00339 

6. 

OUTCI  . 

003*0 

6. 

SIMmE  (SEE 

LINE  00153) 

003*1 

6. 

PACK  (SEE 

LINE  00277) 

003*2 

6. 

OELADD  (SEE 

LINE  00 162) 

003*3 

6. 

OESTROy 

003** 

7.  TAPES* 

0  03*S 

7.  OUTCl . 

003*6 

7.  SETpTRS  ( 

SEE  LINE  00203) 

003*7 

7.  TERMAC3 

003*8 

9.  UNPACK 

(SEE  LINE  00199) 

003*9 

9.  XTOI. 

00350 

8.  NO*UCIT 

00351 

9»  Entry® 

(SEE  LINE  00011) 

00352 

9.  HSXADO 

(SEE  LINE  00252) 

00353 

9.  MEXMULT 

0035* 

10.  EINTR 

YP  (SEE  LINE  00011) 

00355 

10.  ITOJ 

• 

00356 

10.  EXITP  (SEE  LINE  00033) 

00357 

9.  SETHEX 

(SEE  LINE  0026*) 

00358 

9.  SINmE 

(SEE  LINE  00153) 

00359 

9.  A309U0K 

00360 

10.  ENTRYP  (SEE  LINE  oooin 

00361 

10.  EXITP  (SEE  LINE  00033) 

00362 

9.  EInOBLK 

(SEE  LINE  00207) 

00363 

9.  OROP8LK 

(SEE  LINE  00299) 

0036* 

9.  RELEASE 

(SEE  LINE  001*7) 

00365 

9.  EXITP 

(SEE  LINE  00033) 

00366 

8.  RELEASE 

(SEE  LINE  001*7) 

00367 

7.  KILELIT 

00368 

a.  ginme1 

(SEE  LINE  00153) 

00369 

8.  0ELA30 

(SEE  LINE  00162' 

00370 

8.  STOP. 

00371 

8.  UNPACK 

(SEE  LINE  00139) 

00372 

8.  RELEASE 

(SEE  LINE  001*7) 

00373 

8.  UNSTAT 

(SEE  LINE  00309) 

0037* 

8.  F.TKYPE 

00375 

9.  UNPACK 

(SEE  LINE  00189) 

00376 

9.  RELEASE 

(SEE  LINE  001*7) 

00377 

9.  FTNOBLK 

(SEE  LINE  00207) 

00378 

9.  TRACE 

(SEE  LINE  000*8) 

00379 

9,  MESaGE 

(SEE  LINE  00012) 

00380 

9.  RITEI 

(SEE  LINE  00015) 

00381 

9.  C.1ST 

(SEE  LINE  00058) 

00382 

9.  F53JMP 

(SEE  LINE  00313) 
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00383 
00384 
00385 
00386 
00387 
00388 
00389 
00  390 
00391 
00392 
00393 
00394 
00395 
00396 
00397 
00398 
00399 
00400 
00401 
00402 
00403 
00404 
00405 
00406 
00407 
00408 
00409 
00410 
00411 
00412 
00413 
00414 
0041S 
00416 
004)  7 
004 18 
00419 
00420 
00421 
00422 
00423 
00424 
00425 
00426 
00427 
00428 
00429 
00430 
00431 
00432 
00433 
00434 
00435 
00436 
00437 


9.  09QS6i_<  (SEE  LINE  00299) 

9.  BACK  ( SEE  LINE  00277) 

8.  EIN09LK  ( SEE  LINE  00207) 

3.  I090P9LK  (SEE  LINE  00299) 

7.  SIMMS  (SEE  LINE  00153) 

T.  oemo  (SEE  LINE  00162) 

7.  SAMWfSE 

8.  UNPACK  (SEE  LINE  00199) 

S.  SIW  (SEE  LINE  00153) 

8.  OEL A30  (SEE  LINE  00162) 

8.  03T0E9. 

8.  pELEaSE  (SEE  LIME  00147) 

8.  BTSN3PS 
9.  SEEKP 

9.  UNPACK  (SEE  LINE  00189) 

9.  VAN* 

10.  JNP4CK  (SEE  LINE  00199) 

10.  TAPES* 

10.  OUTCI. 

10.  794CE  (SEE  LINE  00048) 

10.  OUT  A 

11.  ENT oro  (SEE  LINE  00011) 

U.  TAPE6* 

11.  OUT  Cl • 

11.  EXITP  (SEE  LINE  000331 

10.  FSDUMP  (SEE  i_  I  ME  00313) 

10.  STOP. 

10.  »*C<  (SEE  LINE  00277) 

9.  PSLEASE  (SEE  LINE  00147) 

9.  3ETPT9S  (SEE  LINE  00203) 

9.  CPCLOSS 

10.  EINOBLK  (SEE  LINE  00207) 

10.  UNPACK  (SEE  LINE  00189) 

10.  OS008LK  (SEE  LINE  00299) 

10.  OELADO  (SEE  LINE  00162) 

9.  3NLALLE 

10.  NES3IL3  (SEE  LINE  00275) 

10.  OElaOD  (SEE  LINE  00162) 

10.  TANK  (SEE  LINE  00399) 

10.  NANOZPT 
11.  9ATCEAS 
12.  CANCAlO 


13. 

TANK 

(SEE  LINE  00399) 

13. 

pElEaSE 

(SEE  LINE  00 1  A 7 ) 

13. 

T  AP£6* 

13. 

OUTCI  . 

13. 

PE  AO  I L 

14.  UNPACK 

(SEE  LINE  3 0 l e 

14.  TANK 

1  SEE  LINE  0039 

14.  SUCK 

15.  UNPACK  (SEE  LINE  0 

15.  PACK  ( 5EE:  Li  it  0 

14.  TAPE6# 

14.  OUTCI. 

14.  8EL0CAT 
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00*38 

15.  TANK 

(SEE  LINE  0 

00*39 

15.  STICK 

(SEE  LINE  C 

00**0 

1*.  0E|_*00 

(SEE  LINE  0016 

00**1 

12.  3IHME  'SEE 

LINE  00153) 

00**2 

12.  (JNPACK  (SEE 

LINE  00199) 

00**3 

12.  SEEKTFU 

00*** 

13.  TRKCHEK 

00**5 

1*.  THH2PS 

(SEE  LINE  302? 

00**6 

1*.  SORT . 

00**7 

1*.  *T*N2. 

00**8 

1*.  YANK 

(SEE  LINE  0039 

00**9 

l*.  nESAGE 

(SEE  LINE  0001 

00*50 

l*.  RITEI 

(SEE  LINE  0001 

00*51 

l*.  CLIST 

(SEE  LINE  0005 

00*52 

1*.  FSOUMP 

(SEE  LINE  3031 

00*53 

1*.  stick 

(SEE  LINE  00*3 

00*5* 

1*.  TOAOIL 

00*55 

15.  TAPE6  * 

00*56 

15.  OUTCt. 

00*57 

15.  yank 

(SEE'  LINE  0 

00*58 

15.  STICK 

(SEE'  LINE  3 

00*59 

15.  RELOCAT 

(SEE  LINE  0 

00*60 

15.  3I*M£ 

(SEE  LINE  0 

00*61 

1*.  BNLALLE 

(SEE  LINE  00*1 

00*62 

13.  AUtOFU 

00*63 

1*.  GIMXE 

(SEE  LINE  0015 

00*6* 

1*.  STICK 

(SEE  LINE  00*3 

00*65 

1*.  DEl»OD 

(SEE  LINE  3016 

00*66 

1*.  TAP£6» 

00*67 

1*. *DUTCI. 

00*66 

13.  allopat 

00*69 

1*.  3IMNE 

(SEE  LINE  3015 

00*70 

1*.  STICK 

(SEE  LINE  30*3 

00*71 

1*.  delaoo 

(SEE  LINE  3016 

00*72 

1*.  TAPE6* 

00*73 

l*.  OUTCI , 

00*7* 

12.  STICK  (SEE 

LINE  00*320 

00*75 

12.  RELEASE  (SEE 

LINE  001* T) 

00*76 

ll.  TANK  (SEE  LINE  003981 

00*77 

II.  STICK  (SEE  LINE  00*32) 

00*78 

11.  TOAOIL  (SEE  LINE  00*5*1 

00*79 

11.  RELOCAT  (SEE  LINE  00*37) 

00*80 

11.  31  LOUT 

00*81 

12.  cnacttk 

00*82 

13.  YANK  (SEE  LINE  00338) 

00*83 

13.  RELEASE  (SEE  LINE  001*7) 

00*8* 

12.  RELEASE  (SEE 

LINE  001*7) 

00*85 

12.  ’JNPACK  (SEE 

LINE  00189) 

00*86 

12.  TANK  (SEE 

LINE  00398) 

00*87 

12.  TOAOIL  (SEE 

LINE  00*5*1 

00488 

10.  OILOOT  (SEE  LINE  00*80) 

00*89 

10.  STICK  (SEE  LINE  00*32) 

00*90 

8.  EIN05LK  (SEE  LINE  00207) 

00*91 

8.  0R0P9LK  (SEE  LINE  00299) 

00*92 

7.  CRCOIES 
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00493 

3. 

UNPACK 

(SEE 

LINE 

00199) 

00494 

a. 

QElEaSE 

(SEE 

LINE 

00147) 

00495 

8. 

OELAOO 

(SEE 

line 

00162) 

00496 

S. 

FIN03L* 

(SEE 

LINE 

00207) 

00497 

8. 

TRACS' 

(SEE 

LINE 

000*3) 

00498 

a. 

m»Sa3£ 

(SEE 

LINE 

00012) 

00499 

a. 

RITEl 

(SEE 

line 

00015) 

00500 

a. 

CLlST 

(SEE 

line 

00058) 

00501 

a. 

080P3LK 

(SEE 

LINE 

00299) 

00502 

7.  unlink 

00503 

a. 

UNPACK 

(SEE 

line 

00189) 

00504 

7.  RELEASE 

(SEE  LINE  001 

*7) 

00505  7.  UNST4T  ( SEE  LINE  00309) 


00506 

5.  FTNO0LK 

(SEE 

LINE  00207) 

00507 

5.  XOK 

00508 

5.  RANOOM. 

00509 

5.  NUK0LNO 

00510 

6.  UNPACK 

(SEE  LINE  00189) 

00511 

6.  GIMME 

(SEE  LINE  00153) 

00512 

6.  HEXAOO 

(SEE  LINE  00252) 

00513 

6.  GETHEX 

(SEE  LINE  0026*) 

00514 

6.  TAPE64 

00515 

6.  0UTC1. 

00516 

6.  OELAOO 

(SEE  LINE  00162) 

00517 

6.  SAMMTPE 

(SEE  LINE  00389) 

00518 

6.  TERMACO 

(SEE  LINE  003*7) 

00519 

6.  FIN08LK 

(SEE  LINE  00207) 

00520 

6.  RELEASE 

(SEE  LINE  00147) 

00521 

6.  OROPQLK 

(SEE  LINE  00299) 

00522 

6.  UNLINK 

(SEE  LINE  00502) 

00523 

5.  090PBLK 

(SEE 

LINE  00299) 

0052* 

5.  HISTORY 

(SEE 

LINE  00330) 

00525 

5.  OELAOO 

(  SEE 

LINE  00162) 

00526 

5.  STATPAK 

00527 

4. 

COMMO 

00520 

5.  UNPACK 

ISEE 

LINE  00189) 

00529 

5.  OELAOO 

(SEE 

LINE  00162) 

00530 

5.  RELEASE 

(SEE 

LINE  001*7) 

00531 

5.  PACK 

(SEE 

LINE  00277) 

00532 

4. 

003FITE 

00533 

5.  GETPTRS 

(SEE 

LINE  00203) 

00534 

5.  UNSTAT 

(SEE 

LINE  00309) 

00535 

5.  T APE6* 

00536 

5.  OUTCI. 

00537 

5.  HISTORY 

(SEE 

LINE  00330) 

00538 

5.  ETN08LK 

(SEE 

LINE  00207) 

00539 

5.  OROP8LK 

(SEE 

LINE  00299) 

00540 

5.  OELAOO 

(  SEE 

LINE  00162) 

00541 

5.  XPA  A 

00542 

5.  RANDOM. 

00543 

5.  GIMME 

(SEE 

LINE  00153) 

0054* 

5.  OESTROY 

(SEE 

LINE  003*3) 

005*5 

4. 

ENGAGE 

005*6 

5.  GETPTRS 

(SEE 

LINE  00203) 

005*7  5.  TRYSH07 
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00543 

6.  QOTOER . 

00549 

6.  TAPE6# 

00550 

6.  OUTCI. 

00551 

6.  YANK 

(SEE  LINE  00398) 

00552 

6.  8ATCEAS 

(SEE  LINE  00423) 

00553 

6.  BNLALLE 

(SEE  LINE  00418) 

00554 

6.  FIRECHk 

00555 

7.  THXJKY 

(SEE  LINE  00228) 

00556 

7.  SIN. 

00557 

7.  COS. 

00558 

7.  SORT. 

00559 

7*  ATAN2. 

00560 

7.  ASIn. 

00561 

5.  TAPE6# 

00562 

5.  OUTCI. 

00563 

5.  GIMME 

(SEE  LINE  00153) 

00564 

5.  OELADO 

(SEE  LINE  00162) 

00565 

5.  UNPACK 

(SEE  LINE  00189) 

00566 

5.  PACK 

(SEE  LINE  00277) 

00567 

5.  AMMOCHK 

00563 

6.  MESBILD 

(SEE  LINE  00275) 

00569 

6.  OELAOO 

(SEE  LINE  00162) 

00570 

6.  QOTOER. 

00571 

6.  8YN0TR0 

00572 

7.  UNPACK 

(SEE'  LINE  00189) 

00573 

7.  BATCEAS  (SEE  LINE  00423) 

00574 

7.  QtLOJT 

(SEE  LINE  00430) 

00575 

7.  TAPES# 

00576 

7.  OUTCI. 

00577 

6.  TAPES# 

00573 

6.  OUTCI. 

00579 

5.  RELEASE 

(SEE  LINE  00147) 

00580 

5.  HISTORY 

(SEE  LINE  00330) 

00581 

*.  ELY 

00582 

5.  GETPTRS 

(SEE  LINE  00203) 

00583 

5.  UNSTAT 

(SEE  LINE  00309) 

00584 

5.  HEXMOVE 

00585 

6.  trace 

(SEE  LINE  00048) 

00586 

6.  HESA5E 

(SEE  LINE  00012) 

00587 

6.  RITEI 

(SEE  LINE  00015) 

00588 

6.  CLIST 

(SEE  LINE  00058) 

00589 

6.  UNPACK 

(SEE  LINE  00189) 

00590 

6.  XTO I  . 

00591 

6.  NOKUCIT 

(SEE  LINE  00350) 

00592 

6.  EIN08LK 

(SEE  LINE  00207) 

00593 

6.  0R0P8LK 

(SEE  LINE  00299) 

00594 

6.  RELEASE 

(SEE  LINE  00147) 

00595 

6.  PACK 

(SEE  LINE  00277) 

00596 

6.  UOLLOAO 

00597 

7.  ENTRYB 

(SEE  LINE  00011) 

00598 

7.  GIMME 

(SEE  LINE  00153) 

00599 

7.  AOOBLOK  (SEE  LINE  00359) 

00600 

7.  EXIT» 

(SEE  LINE  00033) 

00601 

5.  EUELCMK 

00602 

6.  UNPACK 

(SEE  LINE  00189) 

page  si 
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00603 

00604 

00605 

00606 

00607 

00608 

00609 

00610 

00611 

00612 

00613 

00614 

00615 

00616 

00617 

00618 

00619 

00620 

00621 

00622 

00623 

00624 

00625 

00626 

00627 

00628 

00629 

00630 

00631 

00632 

00633 

00634 

00635 

00636 

00637 

00638 

00639 

00640 

00641 

00642 

00643 

00644 

00645 

00646 

00647 

00648 

00649 

00650 

00651 

00652 

00653 

00654 

00655 

00656 

00657 


P*3£ 

6.  HEXDIST 
6.  S0T0A8 


7.  UNPACK 

(SEE  LINE  00189) 

7.  ELTyfSE 

(SEE  LINE  00374) 

7.  OPTPrM 

8.  SI4MEI 

(SEE  LINE  00153) 

a.  TMH2*S 

(SEE  LINE  0022b) 

8.  MEXC4Z 

9.  EnTRYP 

(SEE  LINE  00011) 

9.  TRACE 

(SEE  LINE  00048) 

9.  MESA5E 

(SEE  LINE  00012) 

9.  9ITEP 

(SEE  LINE  00066) 

9.  CLIST 

(SEE  LINE  00058) 

9.  MEXADD 

(SEE  LINE  00252) 

9.  MEXINV 

10.  ENTRYP  (SEE  LINE  00011) 

10.  1T0J. 

10.  EXI 

TP  (SEE  LINE  00033) 

9.  3ETMEX 

(SEE  LINE  00264) 

9.  E X I TP 

(SEE  LINE  00033) 

8.  LlNEX 

9.  EnTRYP 

(SEE  LINE  00011) 

9.  EX  I  TP 

(SEE  LINE  00033) 

a.  pack 

(SEE  LINE  00277) 

T.  RELEASE 

(SEE  LINE  00147) 

T.  THM2aS 

(SEE  LINE  00226) 

7.  aTan2. 

6-  TAPE6* 

6.  ourci. 

6,  MES8ILD  [SEE  LINE  00275) 

6.  OELAOO  (SEE  LINE  00162) 

5.  SHBKJLL  [SEE  LINE  00327) 

5.  ELITE 

6.  INTRFLY 


7. 

TSTHEX 

(SEE 

LINE 

00220) 

7. 

MEXOIST 

7. 

MESBILD 

(SEE 

LINE 

00275) 

7. 

OELAOO 

(SEE- 

LINE 

00162) 

7. 

TAPES* 

7. 

OUTCI. 

7. 

UNPACK 

(SEE 

LINE 

00189) 

7. 

TMM23S 

(SEE 

LINE 

00226) 

7. 

ATAN? . 

7. 

OPTPTM 

(SEE 

LINE 

00607) 

7. 

RELEASE 

(SEE 

LINE 

00147) 

UNPACK 

(SEE  LINE  00189) 

COMMAND 

7. 

UNPACK 

(SEE 

LINE 

00189) 

7. 

30T0ER. 

7. 

OELAOO 

(SEE 

LINE 

00162) 

7, 

TAPES* 

7. 

OUTCI. 

7. 

MESBILD 

(SEE 

LINE 

00275) 

7. 

FLTm YR£ 

(SEE 

LINE 

00374) 

7. 

THH2»S 

(SEE 

LINE 

00226) 
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00658 

00659 

00660 

00661 

00662 

00663 

00666 

00665 

00666 

00667 

00668 

00669 

00670 

00671 

00672 

00673 

00676 

00675 

00676 

00677 

00678 

00679 

00680 

00681 

00682 

00683 

00686 

00685 

00686 

00687 

00688 

00689 

00690 

00691 

00692 

00693 

00696 

0069S 

00696 

00697 

00698 

00699 

00700 

00701 

00702 

00703 

00706 

00705 

00706 

00707 

00708 

00709 

00710 

00711 

00712 
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7.  a  Tan  2 • 

6.  HEXCMZ  (SEE  LINE  00610) 

6.  OPTPTh  (SEE  LINE  00607) 

6.  RELEASE  (SEE  LINE  00167) 

6.  SIN. 

6.  DELAOD  (SEE  LINE  00162) 

5.  DELAOO  (SEE  LINE  00162) 

5.  STATPAK 

5.  SIMMS  (SEE  LINE  00153) 

5.  PACK  (SEE  LINE  00277) 

5.  TAPE6* 

5.  OuTC I . 

5.  DESTROY  (SEE  LINE  00363) 

6.  NATBOR 

5.  UNPACK  (SEE  LINE  00189) 

5.  MESAGE  (SEE  LINE  00012) 

5.  RtTEI  (SEE  LINE  00015) 

5.  TRACE  (SEE  LINE  00068) 

5.  CLIST  (SEE  LINE  00058) 

5.  HEXOIST 

5.  GIMME  (SEE  LINE  00153) 

5.  DELAOO  (SEE  LINE  00162) 

5.  RELEASE  (SEE  LINE  00167) 

6.  PERCEPT 

5.  SETPTRS  (SEE  LINE  00203) 

5.  A8SEE 

6.  UNPACK  (SEE  LINE  00189) 

6.  OELAOO  (SEE  LINE  00162) 

6.  RELEASE  (SEE  LINE  00167) 

6.  TAPE6* 

6.  OUTCI. 

5.  CFLYCRC 
6.  CRCSEE 

7.  RELEASE  (SEE  LINE  00167) 

7.  SIMME  (SEE  LINE  00153) 

7.  UNPACK  (SEE  LINE  00189) 

7.  OELADO  (SEE  LINE  00162) 

7.  CRCEVMT 

8.  GINME  (SEE  LINE  00153) 

8.  TAPES* 

8.  OUTCI. 

8.  OELADO  (SEE  LINE  00162) 

8.  RELEASE  (SEE  LINE  00167) 

8.  FIN03LK  (SEE  LINE  00207) 

8.  OSTECT 

9.  MEXDI5T 

9.  UNPACK  (SEE  LINE  00189) 

9.  T MM2PS  (SEE  LINE  00226) 

9.  A  T  A  N2 , 

9.  LDSRAOR 

10.  ISHIFT 

10.  DPTPTM  (SEE  LINE  00607) 

10.  THM2PS  (SEE  LINE  00226) 

10.  SORT. 

10.  COS. 
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00713 

90714 

00715 

00716 

00717 

00718 

00719 

00720 

00721 

00722 

00723 

00  724 

00725 

00726 

00727 

00728 

00729 

00730 

00731 

00732 

00733 

0073* 

00735 

00736 

00737 

00738 

00739 

00740 

00741 

00742 

00743 

00  744 

00745 

00746 

00747 

00748 

00749 

00750 

00751 

00752 

00753 

0075* 

00755 

00756 

00757 

00758 

00759 

00760 

00761 

00762 

00763 

00764 

00765 

00766 

00767 
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10.  JWUCK  (SEE  LINE  00159) 

10.  DECEASE  (SEE  LINE  001*7) 

9.  C35, 

9.  34  NOON. 

9.  74PE64 
9.  0 JTCI  • 

9.  UNPACK  (SEE  LINE  00189) 

8.  nEXOIST 

8.  L  359439  (SEE  LINE  00707) 

8.  COS. 

a.  04 no on. 

8.  C9CT9A< 

9.  EtNOSH  (SEE  LINE  00207) 

9.  UNP4CK  (SEE  LINE  00289) 

9.  NES8IL3  (SEE  LINE  00275) 

9.  QCLAOO  (SEE  LINE  D01b2) 

9.  740E6* 

9.  OJ7C2 • 

9.  COCKlL 


10. 

riNOBLS 

(SEE 

LINE 

00207) 

10. 

JNP4CK 

(SEE 

LINE 

00189) 

10. 

RELEASE 

(SEE 

LINE 

001*7) 

10. 

3S0»9ls 

(SEE 

LINE 

00299) 

10. 

7APE6* 

10. 

3UTCI. 

10. 

3EL400 

(SEE 

LINE 

00162) 

,  943NOVE 

10. 

PIN09LS 

(SEE 

LINE 

00207) 

10. 

SINNE 

(SEE 

LINE 

00153) 

10. 

ADD0L0* 

(SEE 

LINE 

00359) 

10. 

NlSToar 

(SEE 

LINE 

00330) 

10. 

JNPACK 

(SEE 

LINE 

00199) 

lo. 

release 

(SEE 

LINE 

001*7) 

lo. 

390OBLN 

(SEE 

LINE 

00299) 

10. 

7STNEX 

(SEE 

LINE 

00220) 

10. 

NEXDIST 

10. 

NE53IL3 

(SEE 

LINE 

00275) 

10. 

3ELA00 

(SEE 

LINE 

00162) 

9.  090O8H  (SEE  LINE  00299) 

9.  94NOON. 


9.  NE8N0VE 

10.  EIN08LS  (SEE  LINE  00207) 
U.  9AN00N. 

10.  T APES* 

10.  0U7CI. 

10.  SInnE  (SEE  LINE  00153) 

10.  4009L0N  (SEE  LINE  00359) 

10.  NtSTOHY  (SEE  LINE  00330) 

10.  3EL400  (SEE  LINE  00162) 

6.  UNSTAT  (SEE  LINE  00309) 

6.  ELYSEE 

7.  0EL43O  (SEE  LINE  00162) 

7.  8IMNE  (SEE  LINE  00153) 

T,  4008L0K  (SEE  LINE  00359) 

T.  TAPES* 
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00768 

7.  OUtC 1 « 

00769 

7.  XESRILO 

(SEE  LINE 

00275) 

00770 

7.  RELEASE 

(SEE  LINE 

001*7) 

00771 

7.  HEXOIST 

00772 

7.  DETECT 

(SEE  LINE 

00702) 

00773 

7.  HISTORY 

(SEE  LINE 

00330) 

0077* 

6  • 

ATKASES 

00775 

7.  GImhE 

(SEE  LINE 

00153) 

00776 

7.  OELADO 

(SEE  LINE 

00162) 

00777 

T.  DESTROY 

(SEE  LINE 

003*3) 

00778 

7.  TAPES* 

00779 

7.  OUTcl • 

00780 

7.  ADDBLOK 

(SEE  LINE 

00359) 

00781 

7.  THH?*S 

(SEE  LINE 

00226) 

00782 

7.  A Tan 2. 

00783 

6. 

CRC21NT 

0078* 

7.  UNPiC< 

(SEE  LINE 

00189) 

00785 

7.  TAPES* 

00786 

7.  OUTcl. 

00787 

7.  HESel-O 

(SEE  LINE 

00275) 

00  788 

7.  OELaDO 

(SEE  LINE 

00162) 

00789 

7.  OpTpTH 

(SEE  LINE 

00607) 

00790 

7.  RELEASE 

(SEE  LINE 

001*7) 

00791 

7.  THH2»S 

(SEE  LINE 

00226) 

00792 

7.  ATAnZ. 

00793 

6. 

rondsee 

0079* 

7.  UNPACK 

(SEE  LINE 

00189) 

00795 

7.  opTpth 

(SEE  LINE 

00607) 

00796 

7.  THH?»S 

(SEE  LINE 

00225) 

00797 

7.  ATAN2. 

00798 

7.  RELEASE 

(SEE  LINE 

001*7) 

00799 

7.  TAPES* 

00800 

7.  OUT C I » 

00801 

7.  3ETPTRS 

(SEE  LINE 

00203) 

00802 

7.  UNSTAT 

(SEE  LINE 

00309) 

00803 

7.  ST  ATS  AK 

0080* 

6. 

SNOLOOk 

00805 

7.  FIN03LK 

(SEE  LINE 

00207) 

00806 

T.  XPO 

00807 

7.  RANOOH. 

00808 

T.  OELaDO 

(SEE  LINE 

00162) 

00809 

T.  HISTORY 

(SEE  LINE 

00330) 

00810 

7.  TAPES* 

0081  1 

7.  OUTCI. 

00812 

7.  UNPACK 

(SEE  LINE 

00189) 

00813 

7.  Thh?*S 

(SEE  LINE 

00226) 

0081* 

7.  ATAN2. 

00815 

6. 

STATPAk 

00816 

5.  SahSEE 

0081  7 

6. 

SAHPRCX 

00818 

7.  TRACE 

(SEE  LINE 

000*8) 

00819 

7.  XESaSE 

(SEE  LINE 

00012) 

00820 

7.  RITE* 

(SEE  LINE 

00066) 

00821 

7.  CLlST 

(SEE  LINE 

00058) 

00822 

T.  SEEK* 

PA 
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00823 

7. 

DETECT 

(SEE  LINE  007021 

0082* 

7. 

SYTkCMK 

00825 

8.  S3RT. 

00826 

8.  aTAN?. 

00827 

8.  058*09 

(SEE 

LINE  00707) 

00828 

8.  OElADO 

(SEE 

LINE  00162) 

00828 

8.  YANK 

(SEE 

LINE  00398) 

00830 

8.  S 7 1 C <' 

(SEE 

LINE  00*32) 

00831 

8.  TDAOIL 

(SEE 

LINE  00*5*) 

00832 

7. 

NENPERC 

00833 

8.  Ht ST D8Y 

(SEE 

LINE  00330) 

0083* 

8.  GtMMEl 

(SEE 

LINE  00153) 

00835 

8.  STICK' 

(SEE 

LINE  00*32) 

00836 

a.  0ELA30 

(SEE 

LINE  00162) 

00837 

7. 

SETPT9S 

(SEE  LINE  00203) 

00838 

7. 

CRCT9AK 

(SEE  LINE  0072*) 

00839 

7. 

8YP  *  5‘JP 

008*0 

8.  SEEKS' 

008*1 

8.  UNPACK 

(SEE 

LINE  001391 

008*2 

8.  GI9ME; 

(SEE 

LINE  00153) 

008*3 

a.  p ack 

(SEE 

LINE  00277) 

008** 

8.  nEMPERC 

(SEE 

LINE  00832) 

008*5 

8.  GETPTRS 

(SEE 

LINE  00203) 

008*6 

8.  C9CT9AK 

(SEE 

LINE  0072*) 

008*7 

7. 

8YEND8S 

(SEE  LINE  00395) 

008*8 

7, 

cacioss 

(SEE  LI* 

IE  00*13) 

008*9 

7. 

oaop’os 

00850 

8.  YANK 

(SEE 

LINE  00399) 

00851 

8.  RELEASE 

(SEE 

LINE  001*7) 

00852 

8.  UESSILO 

(SEE 

LINE  00275) 

00853 

8.  OELADD 

(SEE 

LINE  00162) 

0085* 

8.  SEEKENG 

00855 

9.  08QPPS2 

00856 

10.  Y  ANK 

(SEE  LINE  00398) 

00857 

10.  RELEASE 

(SEE  LINE  001*7) 

00858 

10.  9ES3ILD 

(SEE  LINE  00275) 

00859 

10.  DELADO 

(SEE  LINE  00162) 

00860 

10.  SEE<EVS 

(SEE  LIVE  0085*) 

00861 

10.  3JMME 

(SEE  LINE  00153) 

00862 

10.  dlyact 

00863 

11. 

UNPACK 

(SEE  LINE  00189) 

0086* 

11. 

PACK 

(SEE  LINE  00277) 

00865 

11 . 

STICK 

(SEE  LINE  00*32) 

00866 

9.  GIMME 

(SEE  LINE  00153) 

00867 

9.  OELaOO 

1  (SEE  LINE  00162) 

00868 

9.  SSLL 

00869 

10.  JNPACK 

(SEE  LIVE  00189) 

00870 

10.  ISMIFT 

00871 

10.  INSERT 

00872 

11. 

UNPACK 

(SEE  LINE  00189) 

00873 

11. 

XSM1FT 

0087* 

9.  AlLOBAT 

00875 

10.  ORIDRTY 

00876 

10.  NES3IL0 

(SEE  LIVE  00275) 

00677 

10.  GIMME 

(SEE  LIVE  00153) 
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00878 

00879 

00880 

00881 

00882 

00883 

00884 

00885 

00886 

00887 

00888 

00889 

00890 

00891 

00892 

00893 

00894 

00895 

00896 

00897 

00898 

00899 

00900 

00901 

00902 

00903 

00904 

00905 

00906 

00907 

00908 

00909 

00910 

009U 

00912 

00913 

00914 

00915 

00916 

00917 

00918 

00919 

00920 

00921 

00922 

00923 

00924 

00925 

00926 

00927 

00928 

00929 

00930 

00931 

00932 
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10.  ®ACK  (SEE  LINE  00277) 

10.  TAPE6* 

10.  DUTCI. 

10.  OUT  A  (SEE  LISE  00403) 

10.  DEL 400  (SEE  LISE  00162) 

10.  Y ASK  (SEE  LISE  00398) 

10.  STICK  (SEE  LISE  00432) 

10.  TOAOIL  (SEE  LISE  00434) 

9.  RELEASE  (SEE  LISE  00147) 

8.  alSME!  (SEE  LISE  00153) 

8.  OLTACT  (SEE  LISE  00862) 

7.  8SLALLE  (SEE  LINE  00418) 

7.  YANK  (SEE  LINE  00398) 

7.  RELEASE  (SEE  LINE  00147) 

6.  OELAOO  (SEE  LINE  00162) 

6.  RELEASE  (SEE  LINE  001*7) 

4.  9LAS 

5.  ENTRYP  (SEE  LISE  00011) 

5.  SETPTRS  (SEE  LISE  00203) 

5.  THTRPLS 

6.  ENTRYP  (SEE  LINE  00011) 

6.  C0R30UN 

7.  Entry®-  (see  line  ooom 

7.  aiMME  (SEE  LINE  00153) 

7.  TNM2®S  (SEE  LISE  00226) 

7.  TXY2SAL  (SEE  LISE  00242) 

7.  HEXOIST 
7.  SIN. 

7.  COS. 

7.  LINEX  (SEE  LISE  00623) 

7.  OPTPTH  (SEE  LISE  00607) 

7.  EXIT®  (SEE'  LISE  00033) 

6.  REVISE 

7.  ENTRY®-  (SEE-  LISE  OOOll) 

7.  3IM*£  (SEE  LINE  00153) 

7.  A8VSC0R 

9.  ENTRY®  (SEE  LINE  OOOll) 

8.  CLOSCOR 

9.  ENTRYP  (SEE  LISE  OOOll) 

9.  HEXDIST 

9.  EXITP  (SEE  LISE  00033) 

8.  SISNE  (SEE  LINE  00153) 

8.  A OOS'.OK  (SEE  LISE  00359) 

8.  E X I T ®i  (SEE  LINE  00033) 

7.  RELEASE  (SEE  LISE  001*7) 

7.  EXIT®  (SEE  LISE  00033) 

6.  FIN08LK  (SEE  LINE  00207) 

6.  KOMOARE 

7,  ENTRY®  (SEE  LISE  OOOll) 

7.  UNPACK  (SEE  LISE  00189) 

7.  ®ACK  (SEE'  LISE  00277) 

7.  EXIT®  (SEE  LISE  00033) 

6.  CANDTGT 

7.  entry®  (see  line  ooom 

7.  rjNDSLK  (SEE  LINE  00207) 
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00933 

7.  CL0SC3R 

(SEE  LIME  00915) 

0093* 

7.  JGESJIT 

00935 

a.  entryp 

(SEE  LIME  00011) 

00936 

8.  THX2XY 

(SEE  LINE  00228) 

00937 

8,  *7492. 

00938 

8.  EXIT> 

(SEE  LINE  00033) 

00939 

7.  FQRmTST 

00940 

a.  entryr 

(SEE  LIME  00011) 

00941 

8.  SI5H€‘ 

(SEE  LIME  00153) 

00942 

8.  EIN03L* 

(SEE  LIME  00207) 

00943 

a.  FlNOFLT 

00944 

9.  Entryr 

(SEE  LIME  00011) 

00945 

9.  HEXDIST 

00946 

9.  FtN08L<  (SEE  LIME  00207) 

00947 

9.  K3MPARE  (SEE  LIME  00925) 

00948 

9.  51946 

(SEE  LIME  00153) 

00949 

9.  A303L0<  (SEE  LIME  00359) 

00950 

9.  EX  I  TP 

(SEE  LINE  00033) 

00951 

8.  RELEASE 

(SEE  LINE  00147) 

00952 

8.  EXIT*' 

(SEE  LIME  00033) 

00953 

7.  SIhmE 

(SEE  LIME  00153) 

00954 

7.  AOOBLOK 

(SEE  LIME  00359) 

00955 

7.  T5TG3NE 

00956 

8.  ENTRYP 

(SEE  LINE  00011) 

00957 

8.  PTBEE- 

00958 

9.  En.TRYO 

(SEE  LIME  00011) 

00959 

9.  RELEASE  (SEE  LIME  001*7) 

00960 

9.  I  SHIFT 

00961 

9.  EXtTP 

(SEE  LIME  00033) 

00962 

8.  5I4M£! 

(SEE  LIME  00153) 

00963 

8.  EXITS' 

(SEE  LINE  00033) 

00964 

7.  PTREE 

(SEE  LIME  00957) 

00965 

7.  RAN039. 

00966 

7.  PELA30 

00967 

8.  ENTRyo 

(SEE  LIME  0001  1  ) 

00968 

8.  SI4ME 

(SEE  LIME  00153) 

00969 

8.  RTRMRG 

00970 

8.  EXITS’ 

(SEE  LINE  00033) 

00971 

7.  EXIT® 

( SET  LIME  00033) 

00972 

6. 

ITRAP  (SEE  LINE  00028) 

00973 

6. 

AVAILBl. 

00974 

7,  RELA30 

(SEE  LIME  00966) 

00975 

7.  RELEASE 

(SEE  LIME  001*7) 

00976 

6. 

SCHEDUl 

00977 

7,  UNPACK 

(SEE  LIME  00189) 

00978 

7.  RAN039. 

00979 

T.  RENOEVU 

00980 

8.  UNPACK 

(SEE  LIME  00199) 

00981 

8.  T4X  2  X  Y 

(SEE  LIME  0022S) 

00982 

8.  TXY24XL. 

(SEE  LINE  00242) 

00963 

7,  HEXA30 

(SEE  LINE  00252) 

00984 

7.  OETwEX 

(SEE  LIME  0026*1 

00985 

7.  WEXOIST 

00986 

7.  ACFR43 

00987 

8.  G 1 4M£i 

(SEE  LIME  00153! 
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009SS 

8.  UNPACK 

(SEE  LINE  00189) 

00989 

a.  crfltrl 

00990 

9.  CREATE 

00991 

10.  ENTRYP  (SEE  LINE  00011) 

00992 

10.  3IM*E 

(SEE  LINE  00153) 

00993 

10.  EX I TP 

(SEE  LINE  00033) 

0099* 

9.  3IHXE 

(SEE  LINE  00153) 

00995 

9.  UNPACK 

(SEE  LINE  00189) 

00996 

9.  P AC< 

(SEE  LINE  00277) 

00997 

9.  A009LOK 

(SEE  LINE  00359) 

00998 

9.  HISTORY 

(SEE  LINE  00330) 

00999 

s.  aoobldx 

(SEE  LINE  00359) 

01000 

8.  QPTPTH 

(SEE  LINE  00607) 

01001 

8.  RELEASE 

(SEE  LINE  001*7) 

01002 

8.  PACK 

(SEE  LINE  00277) 

01003 

8.  FLTGEON 

0100* 

9.  PACK 

(SEE  LINE  00277) 

01005 

9.  HEXCHZ 

(SEE  LINE  00610) 

01006 

9.  THM2PS 

(SEE  LINE  00226) 

01007 

9.  ATAN2. 

01008 

8.  MEXOtST 

01009 

8.  0ELA3D 

(SEE  LINE  00152) 

01010 

6. 

OELAOO  ( SEE  LINE  001621 

01011 

6. 

PLANOUT 

01012 

7. 

ENTRY®  ( SEE  LINE  00011) 

01013 

7. 

ourcr. 

0101* 

7. 

EXIT®  (SEE  LINE  00033) 

01015 

6. 

RLRAIO 

01016 

7. 

ENTRY®-  (SEE  LIME  00011) 

01017 

7. 

P(_#»VE 

01018 

8.  ENTRYP 

(SEE  LINE  00011) 

01019 

8.  RLTSTYP 

01020 

9.  ENiTRYP 

(SEE  LINE  00011) 

01021 

9.  RELEASE 

(SEE  LINE  001*7) 

01022 

9.  RLT3TAK 

01023 

10.  ENTRYP 

(SEE  LINE  000  1  1  ) 

0102* 

10.  RLPRAKT 

01025 

11.  ENTRYP  (SEE  LINE  00011) 

01026 

11.  RELEASE  (SEE  LINE  001*7) 

01027 

11.  EXITP  (SEE  LINE  00033) 

01028 

10.  RELEASE  (SEE  LINE  001*7) 

01029 

10.  EXITP 

(SEE  LINE  00033) 

01030 

9.  EXITP 

(SEE  LINE  00033) 

01031 

8.  RELEASE 

(SEE  LINE  001*7) 

01032 

8.  EXITS' 

(SEE  LINE  00033) 

01033 

7. 

rlcoro 

0103* 

8.  ENTRYP 

(SEE  LINE  00011) 

01035 

8.  RLABOB 

01036 

9.  ENTRYP 

(SEE  LINE  00011) 

01037 

9.  RELEASE 

(SEE  LINE  001*7) 

01038 

9.  EXITP 

(SEE  LINE  00033) 

01039 

8.  RELEASE 

(SEE  LINE  001*7) 

010*0 

8.  EXITP' 

(SEE  LINE  00033) 

010*1 

7. 

RELEASE  (SEE  LINE  00U7) 

010*2 

7. 

EXIT®  (SEE  LINE  00033) 

452 
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01043 

01044 

01045 

01046 

01047 

01048 

01049 

01050 

01051 

01052 

01053 

01054 

01055 

01056 

01057 

01058 

01059 

01060 

01061 

01062 

01063 

01064 

01065 

01066 

01067 

01068 

01069 

01070 

01071 

01072 

01073 

01074 

01075 

01076 
01077 
01078 
01079 
01080 
01081 
01082 
01083 
01084 
01085 
01086 
01087 
01088 
01  089 
01090 
01091 
01092 
01093 
01094 
01095 
01096 
01097 


6.  exits  i see  line  000331 

5.  EXITP  (SEE  LIME  00033) 

4.  9QN0ER 

5.  SETPTRS  (SEE  LIME  00203) 

5.  TELYCRC 

6.  CRCThnk 

T.  <JKPaC<  (SEE  LINE  00189) 

7.  RELEASE  (SEE  LINE  00147) 

7.  CRCKtL'  (SEE  LINE  00731) 

7 »  CRCTRA<  (SEE  LINE  00724) 

7.  CRCLOSS  (SEE  (.IKE  00413) 

7.  AB2CRC 


8. 

UKPAC< 

(SEE 

line 

00139) 

8. 

RELEASE 

(SEE 

line 

00147) 

8. 

E I K08l< 

(SEE 

LINE 

00207) 

a. 

3HMEi 

(SEE 

LINE 

00153) 

a. 

a30B'.0< 

(SEE 

LINE 

00359) 

a. 

7  APE  5* 

9. 

OJTCI. 

9. 

O90P3LK 

(SEE 

LINE 

00299) 

7.  I NT2CRC 

a. 

uk»a;h 

(SEE 

LINE 

00139) 

a. 

EIKOSLT 

(SEE 

LINE 

00207) 

8. 

RELEASE 

(SEE 

line 

00147) 

a. 

C9CXIL 

(SEE 

line 

00731) 

a. 

TAPES* 

a. 

OJTCI. 

a. 

OcTtCT 

(SEE 

line 

00702) 

a. 

MES3ILD 

(SEE 

LINE 

00275) 

a. 

OELAOO 

(SEE 

line 

00162) 

a. 

OR3P8LK 

(SEE 

LINE 

00299) 

8. 

3  M*E> 

(SEE 

line 

00153) 

a. 

aOOSlOA 

(SEE 

line 

00359) 

7.  87KPC9C 

8, 

(JN»AC* 

(SEE 

line 

00139) 

8. 

RELEASE 

(SEE 

line 

00147) 

3. 

TAPES* 

8, 

ojrci. 

8. 

CPCLOSS 

(SEE 

line 

00413) 

8* 

C8CKIL 

(SEE 

LINE 

00731 ) 

8. 

C9CT9AS 

(SEE 

LINE 

00724) 

6,  UNS7 At  (SEE  LIKE  00309) 

6  a  AIRTHNK 
7,  HEXOIST 

7,  «*ES8lL0  (SEE  LIVE  00275) 

7,  OELAOO  (SEE  LINE  00162) 

7.  T3TH-X  (SEE  LTKE  00220) 

T,  TAPES* 

7.  OUTCI. 

T.  RAN03*. 

6,  OOOTMN* 

7.  MESP,t.O  (SEE  LIKE  00275) 

T.  OELaOQ  (SEE  LIKE  00162) 

7.  tapes* 

7.  OUTCI. 


01098 

01099 

01100 

01101 

01102 

01103 

01104 

01105 

01106 

01107 

01108 

01109 

omo 

01111 

01112 

01113 

01114 

01115 

01116 

01117 

01118 

01119 

01120 

01121 

01122 

01123 

01124 

0112S 

01126 

01127 

01128 

01129 

01130 

01131 

01132 

01133 

01134 

01135 

01136 

01137 

01138 

01139 

01140 

01141 

01142 

01143 

01144 

0114S 

01146 

01147 

01148 

01149 

01150 

01151 

01152 


7.  SOTO  4  3 
7.  EUELCNK 
6.  STATPAK 
5.  80CTINK 
6.  3NP0NSS 
7.  UNPACK 
7.  S070ER. 

7*  3NPON38 

8.  filcrup 

9.  RANOOM. 

9.  7APE6* 

9.  0JTC1. 

9.  3I44E 
9.  YANK 
9.  STICK 
9.  DELADO 
8.  UNPACK 
8.  TNRANQE 
9.  T  4H2PS 
9.  A7An2. 

9.  S3RT. 

9.  COS. 

9.  TA?S6# 

9.  OJTCI. 

9.  AZILI* 

10.  SIN. 

10.  COS. 

10.  INSECT 
11.  Tan. 
11.  ATAN2. 
10.  SQ9T. 

8.  SHNEi 

a.  0 CL A 30 
a.  setassn 

9.  UNPACK 
9.  PACK 
9.  STICK 
9.  RRIORTY 
9.  RELOCAT 
9.  DELADO 
8.  SECKEN3 
8.  pRIORTY 

8.  RELOCAT 

a. 

9.  G3T0ER. 

8.  OLYACT 
8.  TARES* 


(SEE  LINE  00604) 
(SEE  LINE  00601) 


(SEE  LINE  00139) 


(SEE  LINE  00153) 
(SEE  LINE  00398) 
(SEE  LINE  00*32) 
(SEE  LINE  00162) 
(SEE  LINE  00199) 

(SEE  LINE  00226) 


(SEE  LINE  00153) 
(SEE  LINE  00162) 

(SEE  LINE  00139) 
(SEE  LINE  002TT) 
(SEE  LINE  00432) 

(SEE  LINE  00*37) 
(SEE  LINE  00162) 
(SEE  LINE  0085*) 

(SEE  LINE  00*37) 
(SEE  LINE  00*32) 

(SEE  LINE  00862) 


8.  OJTCI. 

7.  SEEkENS 
7.  SINmE 
7.  OlTaCT 
7.  8YUP3A7 
8.  UNRACK 
8.  RNNOTRO 
9.  TAPE6* 


(SEE  LINE  00854) 
(SEE  LINE  00153) 
(SEE  LINE  00862) 

(SEE  LINE  00139) 


PASE  9 
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P*3E 


92 


01153 

9.  QjYCI. 

0  115* 

9.  RELEASE 

(SEE  LIME  00 167) 

01155 

9.  0IU0UT 

(SEE  LINE  00600) 

01156 

8.  BATtaur 

0115T 

9.  YAK 

(SEE  LIME  00398) 

01158 

9.  BMLALLE 

(SEE  LIME  00618) 

01159 

9.  l/MPACK 

(SEE  LIME  00189) 

0  1 160 

9.  C-tKLASr 

01161 

10.  OROPPOS 

(SEE  LIME  00869) 

01162 

10.  PRIORTY 

01163 

10.  RELOCAT 

(SEE  LIME  00637) 

01164 

10.  OELAOO 

(SEE  LIME  00162) 

01165 

9.  SIMmE 

(SEE  LIME  00153) 

01166 

9.  RELEASE 

(SEE  LIME  00167) 

01  167 

9.  SSLL 

(SEE  LIME  00868) 

01168 

a.  COMAPLY 

01169 

9.  SEEXTAC 

01170 

10.  3ROPPOS 

(SEE  LIME  00869) 

01171 

10.  JNPiCK 

(SEE  LIME  00189) 

01172 

10.  3IMME 

(SEE  LIME  001531 

01173 

10.  PACK 

(SEE  LIME  00277) 

01174 

10.  RELEASE 

(SEE  LIME  00167) 

01175 

10.  SSLL 

(SEE  LIME  00868) 

01176 

10.  OELAOO 

(SEE  LIME  00162) 

01177 

10.  ALLOBAT 

(SEE  LIME  00874) 

01178 

10.  YANK 

(SEE  LIME  00399) 

01179 

10.  REAOIL 

(SEE  LIME  004291 

01180 

9.  SIMME 

(SEE  LIME  00153) 

01181 

9.  DLYAC7 

(SEE  LIME  00862) 

01182 

9.  RELEASE 

(SEE  LIME  00167) 

01183 

8.  OHMS'  (SEE  LINE  00153) 

01186 

8.  PACK  (SEE  LIME  00277J 

01185 

8.  SSLL  (SEE  LINE  00860) 

01186 

8.  OECR4LO 

01187 

9.  ME531L0 

(SEE  LIME  00275) 

01188 

9.  OELAOO 

(SEE  LIME  00162) 

011  39 

9.  7APE6* 

01190 

9.  OjTCI. 

01191 

8.  SSEK74C  (SEE  U"E  01169) 

01192 

8.  DLYACT  (SEE  LINE  00862) 

01193 

8.  RELEASE  (SEE  LHE  00147) 

01196 

6,  8NP0MEP 

01195 

7. 

30TDSR. 

01196 

7. 

SKS9TRK 

01197 

8.  UMP4CK  (SEE  LIME  00189) 

01198 

8.  SEEKS 

01199 

7. 

QRORROS  (SEE 

LINE  00849) 

01200 

7. 

8NLALLE  (SEE 

LINE  00418) 

01201 

7. 

UNPACK  (SEE 

LIME  00189) 

01202 

7. 

CMKLAST  (SEE 

LINE  01160) 

01203 

7. 

SEEK  7AC  (SEE 

LIME  01169) 

01204 

7. 

3IMME  (SEE 

LIME  001531 

01205 

7. 

PACK  (SEE 

LIME  00277) 

Q1206 

7. 

OLYaCT  (SEE 

LIME  00862) 

01207 

7. 

SEEkENQ  (SEE 

LIME  00854) 
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01308 

01309 

01310 

01311 

01313 

01313 

0131* 

01315 

01316 

01317 

01318 

01319 

01330 

01331 

01333 

01333 

01226 

01225 

01326 

01227 

01238 

01239 

01230 

01231 

01333 

01233 

0133* 

01335 

01336 

01237 

01338 

01339 

01340 

01361 

01363 

01363 

01366 

01265 

01366 

01367 

01368 

01269 

01350 

01351 

01253 

01353 

0135* 

01355 

01256 

01357 

01358 

01359 

01360 

01361 

01363 
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7.  MESBILD  I  SEE  LINE  00375) 

7.  0ELA30  (SEE  LIME  00163) 

7.  YANK  (SEE  LINE  00398) 

7.  STICK  (SEE  LINE  00*33) 

7.  9EA0IL  (SEE  LINE  00*39) 

6.  0NCMOPP 

7.  30T0E9. 

7.  *CCE *T 

a.  UNPACK  (SEE  LINE  00139) 

8.  sEEKPi 

8.  aiNHE1  (SEE  LINE  00153) 

8.  STOP. 

a.  STICKI  (SEE  LINE  00*33) 

8.  DETECT  (SEE  LINE  00703) 

a.  DELA30  (SEE  LINE  00163) 

8.  PACK  (SEE  LINE  00377) 

8.  T»»£6* 

8.  (1J7CI. 

a.  byalcov 

9.  UNPACK  (SEE  LINE  00189) 

9.  PACK  (SEE  LINE  00377) 

9.  GINmE  (SEE  LINE  00153) 

9.  SSLL  (SEE  LINE  00868) 

9.  CANCALD  (SEE  LINE  00*3*) 

9.  SSE.KTF'J  (SEE  LINE  00**3) 

9.  RELEASE  (SEE  LINE  001*7) 

9.  PATOEC 

10.  CANCALD  (SEE  LINE  00*3*) 

10.  SEEK  TE  j  (SEE  LINE  00**3) 

9.  BATTCOV 

10.  TRKCHEK  (SEE  LINE  00***) 

10.  ALL3FU  (SEE  LINE  00*63) 

10.  ALLOPAT  (SEE  LINE  00*68) 

9.  OLYACT  (SEE  LINE  00863) 

9.  T  A  ®E6* 

9.  OJTCI. 

8.  RELEASE  (SEE  LINE  001*7) 

8.  BYHE3UP 

9.  SEE<P 

9.  UNPACK  (SEE  LINE  00189) 

9.  OEIAQO  (SEE  LINE  00163) 

9.  9EL0CAT  (SEE  LINE  00*37) 

9.  3ATTC0'.-  (SEE  LINE  01237) 

9.  NE53IL3  (SEE  LINE  00375) 

9.  RELEASE  (SEE  LINE  001*7) 

8.  OJTA  (SEE  LINE  00*03) 

7.  NESBtLO  (SEE  LINE  00375) 

7.  DELA)0  (SEE  LINE  00163) 

7.  SEEK# 

7.  090P»3S  (SEE  LINE  008*9) 

7.  OILOJT  (SEE  LINE  00*80) 

6.  BNPONPa 
7.  SEEK  ® 

7.  TAPES* 

7.  OUTCI. 


456 


BASE 


94 


01263 

7. 

8NRECSV 

01264 

8.  UNPACK  (SEE  LINE  001891 

01265 

8.  nTNOBAK 

01266 

9.  UNP4CK 

( SEE 

LINE 

00189) 

01267 

9.  SINNE 

(SEE 

CINE 

00153) 

01268 

9.  PACK 

(SEE 

CINE 

00277) 

01269 

9.  SSLL 

(SEE 

CINE 

00868) 

01270 

9.  0ECR4CS 

(SEE 

CINE 

01106) 

01271 

9.  SEEKEN3 

(SEE 

CINE 

00854) 

01272 

9.  QcKACT 

(SEE 

LINE 

00862) 

01273 

9.  RELEASE 

(SEE 

CINE 

00147) 

01274 

8.  BACK  (SEE  CINE  00277) 

01275 

6. 

8NPONFO 

01276 

7. 

SEEK® 

01277 

7. 

TAPES* 

01278 

7. 

OUTC  t » 

01279 

7. 

RELEASE  ( SEE 

CINE 

00147) 

01280 

7. 

YANK  (SEE 

CINE 

00398) 

01281 

7. 

080®  3OS  (SEE 

LINE 

00849) 

01282 

7. 

0  ICO J  7  (SEE 

LIVE 

00480) 

01283 

7. 

*€S8tcD  (SEE 

LINE 

00275) 

01284 

7. 

OELASO  (SEE 

CINE 

00162) 

01235 

6. 

RELEASE  (SEE  LINE  001 

47) 

01286 

6. 

S0I3EST 

01287 

7. 

UNPACK  (SEE 

CINE 

00189) 

01288 

7. 

SIMMS'  (SEE 

LINE 

00153) 

01289 

7. 

®4CK  (SEE 

LINE 

00277) 

01290 

01291 

01292 

<31293 


7.  TAPB6P 
T.  OUT C I • 
7.  BANDS'*. 
7.  8NN*r9K 


01294 

8. 

CNKCDV 

01295 

9.  UNPACK 

(SEE  CINE  00189) 

01296 

9.  INRANGE 

(SEE  CINE  01115) 

01297 

9.  3IN8E 

(SEE  LINE  00153) 

01298 

9.  T4®E6» 

01299 

9.  OJTCI. 

01300 

9.  0JT4 

(SEE  C 

INC  00*03) 

0  1 30 1 

9.  0EC40O 

(SEE  L 

INE  00162) 

01302 

a. 

RNCACCE 

(SEE  CINE 

00*18) 

01303 

8. 

SETASSN 

(SEE  CINE 

01131) 

01304 

8. 

SEEK  T  AC 

(SEE  LINE 

01169) 

01305 

8. 

SIN*?' 

(SEE  LINE 

00153) 

01306 

8. 

octact 

(SEE  CINE 

00862) 

01307 

7.  9YN*TBK 

01308 

8. 

MESS  IcO 

(SEE  CINE 

00275) 

01309 

8. 

DEC*  30 

(SEE  CINE 

00162) 

01310 

3. 

sncalce 

(SEE  CINE 

00413) 

01311 

3. 

1 NBAnQE 

(SEE  CINE 

01115) 

01312 

8. 

oPEPaEU 

01313 

9.  UNPACK 

(SEE  C 

INC  00189) 

01314 

9.  PACK 

(SEE  CINE  00277) 

01315 

9.  AJT3P91 

01316 

9.  STICK 

(SEE  LINE  00432) 

01317 

9.  PECOCAT 

(SEE  LINE  00437) 
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01318 

9.  OELAOO 

(SEE  LINE  00162) 

01319 

8.  BATTCOM 

(SEE  LINE  01237) 

01320 

8.  QlMMi! 

(SEE  LINE  00153) 

01321 

a.  olyact 

(SEE  LINE  00862) 

01322 

8.  S  71 C< 

(SEE  LINE  00632) 

01323 

8.  ReLOCAT 

(SEE  LINE  00437) 

01324 

7.  VAN*  (SEE  LINE  00398) 

01325 

7.  RELEASE  (SEE  LINE  OOU?) 

01326 

7.  TOAOIW  (SEE  LINE  00454) 

01327 

7.  STICK  (SEE  LINE  00432) 

01328 

7.  BNCOMTC 

01329 

8.  CHKC39 

(SEE  LINE  01294) 

01330 

8.  090PP0S 

(SEE  LINE  00849) 

01331 

8.  RNLALLE 

(SEE  LINE  00418) 

01332 

8.  SETASSN 

(SEE  LINE  01131) 

01333 

8.  SEEKTAC 

(SEE  LINE  01169) 

01334 

8.  SIMMS. 

(SEE  lINE  00153) 

01335 

8.  OLYACT 

(SEE  LINE  00862) 

01336 

8.  CM<LAS7 

(SEE  LINE  OllSO) 

0133T 

8.  BNCOnhO 

01338 

9.  TA9E6P 

01339 

9.  OjTCI. 

01340 

9.  SIMME 

(SEE  LINE  00153) 

01341 

9.  MES8IL3 

(SEE  LINE  00275) 

01342 

9.  PR'IORTY 

01343 

9.  pack 

(SEE  LINE  00277 ) 

01344 

9.  OELAOO 

(SEE  LINE  00162) 

01345 

9.  YANK 

(SEE  LINE  00398) 

01346 

9.  STICK 

(SEE  LINE  00432) 

01347 

9.  RELEASE 

(SEE  LINE  00147) 

01348 

9.  OROBPOS 

(SEE  LINE  00849) 

01349 

9.  SEEKTAC 

(SEE  LINE  01169) 

01350 

9.  O'.YACT 

(SEE  LINE  00862) 

01351 

8.  BMRECOY 

(SEE  LINE  01263) 

01352 

8.  TAaESP 

01353 

8.  OJTCI. 

01354 

8.  YANK 

1  SEE  LINE  00398) 

01355 

8.  STICO 

(SEE  LINE  00432) 

01356 

8.  T3A0IL 

(SEE  LINE  00454) 

Q 1 357 

8.  DILOJT 

(SEE  LINE  00480) 

01358 

7.  8YCQNTC 

01359 

8.  MES8IL0 

(SEE  LINE  00275) 

01360 

8.  0ELA30 

(SEE  LINE  00162) 

01361 

8.  TNRANGE 

(SEE  LINE  01115) 

01362 

8.  BATCEAS 

(SEE  LINE  00423) 

01363 

8.  BNLAlLE 

(SEE  LINE  00418) 

01364 

8.  PREPaFU 

(SEE  LINE  01312) 

Q136S 

a.  battcov 

(SEE  LINE  01237) 

01366 

8.  SIMME1 

(SEE  LINE  00153) 

01367 

8,  OLYACT 

(SEE  LINE  00882) 

01368 

8.  8YC0NM0 

01369 

9.  TABE6# 

01370 

9.  OJTCI. 

01371 

9.  OELAOO 

(SEE  LINE  00162) 

01372 

9.  AJTOPRI 

r 


01373 

9.  STICK 

(SEE  LIME  00*32) 

0137* 

9.  RELOCAT  (SEC  LINE  00*371 

01375 

9.  84TTCOV  (SEE  LINE  01237) 

01376 

9.  3 I NME 

(SEE  LIME  00153) 

01377 

9.  0UY4CT 

(SEE  LIME  00862) 

01378 

8.  UNPiCK 

(SEE  LIME  00189) 

01379 

8.  874LC00 

(SEE  LIME  01226) 

01380 

8.  STICK' 

(SEE  LINE  00*32) 

01381 

8.  rclocat 

(SEE  LIME  00*37) 

01382 

8.  Y4NK 

(SEE  LIME  00398) 

01383 

8.  T340IU 

(SEE  LINE  00*5*1 

0138* 

7.  OLYACT 

(SEE  LIME  00862) 

01385 

7.  8NCO  MLS 

01386 

8.  0R3990S 

(SEE  LIME  008*9) 

01387 

8.  DILOJT 

(SEE  LIME  00*80) 

01388 

8.  MES8IL3 

(SEE  LIME  00275) 

01389 

8.  OEuAlO 

(SEE  LINE  00162) 

01390 

7.  syconls 

01391 

8.  8*rct*S 

(SEE  LINE  00*23) 

01392 

8.  RMLA'.Le 

(SEE  LIME  00*18) 

01393 

8.  MCS8IL3 

(SEE  LIME  00275) 

0139* 

8.  CsELOO 

(SEE  LIME  00162) 

01395 

8.  (ULOJt 

(SEE  LIME  00*80) 

01396 

7.  8NL4LLE 

(SEE  LlM£'  00*18) 

01397 

7.  0EL430 

(SEE  LIME  00162) 

01398 

6. 

8NP0N04 

01399 

7.  y AM* 

(SEE  LIME  00398) 

01*00 

7.  UVP4CK 

(SEE:  LIME  00189) 

01*01 

7.  30T0ES. 

01*02 

7.  SETA5SN 

(SEE  LIME  01131) 

01*03 

7.  SEEK  r*c 

(SEE  LIME  01169) 

01*0* 

7 «  CHKC3V 

(SEE'  LIME  0129*) 

01*05 

7.  5N1.4LLE 

(SEE  LIME  00*18) 

01*06 

7.  SIMMS’ 

1  SEE  LINE  00153) 

01*07 

7.  SLYaCT 

(SEE  LIME  00862) 

01*08 

7.  8NCONTC 

(SEE  LIME  01328) 

01*09 

7.  SEEkEmO 

(SEE  LIME  0085*) 

01*10 

7.  RELEASE 

(SEE  LIME  001*7) 

01*11 

6. 

TAPE6* 

01*12 

6. 

OUTCI. 

01*13 

6. 

OROPROS  (SEE  LINE  008*9) 

01*1* 

6. 

BNLALLE  (SEE  LINE  00*18) 

01*15 

6. 

MES9ILD  (SE 

E  LIME  002 75) 

01*16 

6. 

OCLAOO  (SEE  LIME  00162) 

01*17 

6. 

0IL0U7  (SEE  LIME  00*80) 

01*18 

6. 

bnpombd 

01*19 

7.  T 4PC4# 

01*20 

T,  OUTCT. 

01*21 

7.  BNNOTAO 

(SEC  LIME  01151) 

01*22 

7.  84TT3JT 

(SEC  LIME  01156) 

01*23 

7.  C0VA»LY 

(SEE  LIME  01168) 

01*2* 

7.  RELE4SE 

(SEE  LINE  001*7) 

01*25 

6. 

SAMATON 

01*26 

7.  UMPA Ct 

(SEE  LINE  00189) 

01*27 

7.  AUTORRI 
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PASE  97 


01*28 

7.  PELoCAT 

(SEE  LINE  00*37) 

01*29 

7.  RELEASE 

(SEE  LINE  001*7) 

01*30 

7.  OtLOJr 

(SEE  LINE  00*80) 

01*31 

7.  TOAOlL 

(SEE  LINE  00*5*) 

01*32 

7.  DEUDO 

(SEE  LINE  00162) 

01*33 

7.  TAPES* 

01*3* 

7.  OUTCt. 

01*35 

6. 

ALL08AT 

(SEE  LINE  0087*) 

01*36 

5.  8TRYTNK 

01*3T 

6. 

8  YCMOPB 

01*38 

7.  ACCE®T 

(SEE'  LINE  01215) 

01*39 

7.  SEEK® 

01**0 

7.  TAPES* 

01**1 

7.  OUT  Cl* 

01**2 

7.  8ATCEAS 

(SEE  LINE  00*23) 

01**3 

7.  OIUOJT 

(SEE  LINE  00*80) 

01*** 

7.  8YAl:3Y 

(SEE  LINE  01226) 

01**5 

7.  8YME3J9 

(SEE  LINE  012*5) 

01**6 

7.  RELEASE 

(SEE  LINE  001*7) 

01**7 

6. 

S0I5EST 

(SEE  LINE  01286) 

0  1  **8 

6. 

SEEkp 

01**9 

6. 

8YPONTM 

01*50 

7.  OtMME 

(SEE  LINE  00153) 

01*51 

7.  UNPACK 

(SEE  LINE  00189) 

01*52 

7.  PACK 

(SEE  LINE  00277) 

01*53 

7.  TAPES* 

01*5* 

7.  QUTCI. 

01*55 

7.  8YCOSTC 

(SEE  LINE  01358) 

01*56 

7.  TRYS-OT 

(SEE  LINE  005*7) 

01*57 

7.  OEUAOO 

(SEE  LINE  00162) 

01*58 

7.  RELEASE 

(SEE  LINE  001*7) 

01*59 

6. 

8YP05E9 

01*60 

7.  UNPACK 

(SEE'  LINE  00189) 

01*61 

7.  CANCALO 

(SEE  LINE  00*2*) 

01*62 

7.  seekts-u 

(SEE  LINE  00**3) 

01*63 

7.  8ATTC3V 

(SEE  LINE  01237) 

01*6* 

7.  OILOJT 

(SEE  LINE  00*80) 

01*65 

7.  PACK 

(SEE  LINE  00277) 

01*66 

7.  OCLAOO 

(SEE  LINE  00162) 

01*67 

T.  PT90NEP 

01*68 

8.  UNPACK 

(SEE  LINE  00199) 

01*69 

8.  PACK 

(SEE  LINE  00277) 

01*70 

8.  CANCalO  (SEE  LINE  00*2*1 

01*71 

8.  SEEKTEU  (SEE  LINE  00**3) 

01*72 

8.  DIlOjT 

(SEE  LINE  00*90) 

01*73 

8.  0ELA30 

(SEE  LINE  00162) 

01*7* 

7.  NES8ILD 

(SEE  LINE  00275) 

01*75 

7.  RELEASE 

(SEE1  LINE  001*7) 

01*76 

6. 

TAPE6* 

01*77 

6. 

OUT  Cl. 

01*78 

6. 

YANK 

(SEE  LINE  00398) 

01*79 

6. 

8ATCEAS 

(SEE  LINE  00*23) 

01*80 

6. 

0NLALLF 

(SEE  LtNE  00*18) 

01*81 

6. 

MESSILD 

(SEE  LINE  00275) 

01*82 

6. 

DELADO 

(SEE  LINE  00162) 
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SA3E  96 


01483 

01484 

01485 

01486 

01487 

01488 

01489 

01490 

01491 

01492 

01493 

01494 

01495 

01496 

01497 

01498 

01499 

01500 

01S01 

01502 

01503 

01504 

01505 

01506 

01507 

01508 

01509 

01510 

01511 

01512 

01513 

01514 

01515 

01516 

01517 

01518 

01519 

01520 

01521 

01522 

01523 

01524 

01525 

01526 

01527 

01528 

01529 

01530 

01531 

01532 

01533 

01534 

01535 

01536 

01S37 


6.  9YP0NF0 

7.  SEEKS 

7.  YANK  (SEE  LINE  00398) 

7.  RELEASE  (SEE  LIME  00U7) 

7.  BATCEAS  (SEE  LINE  00423) 

7.  0IL0J7  (SEE  LINE  00480) 

7.  8YEN0SS  (SEE  LINE  00395) 

7.  NESS  I  i.0  (SEE:  LINE  00275) 

7.  OELADO  (SEE  LINE  00162) 

6.  SAM4T0N  (SEE  LINE  01425) 

6.  8YPQNRL 

7.  UNPACK.  (SEE!  LINE  00189) 

7.  (JOTOER. 

7.  PILERUP  ( SEE  LINE  011061 

7.  INBaysE  (SEE  LINE  01115) 

7.  BREPAFU  (SEE  LINE  01312) 

7.  MESBI'.D  (SEE  LINE  00275) 

7.  OELaDO  (SEE  LINE  00162) 

7.  SEEKTE'J  (SEE  LINE  00443) 

7.  TAPES# 

7.  OUTCI. 

6.  8YP0NRS 

7.  UNPACK  (SEE  LINE  00189) 

7.  RELOAD 

8.  StKMr-  (SEE  LINE  00153) 

8,  53T0ER. 

8.  OELADO  (SEE  LINE  00162) 

8.  RESUPLY 

9.  SINNE  (SEE  LINE  00153) 

9.  O-LAOO  (SEE  LINE  00162) 

7.  TAPES* 

7.  OUTCI. 

7.  RELEASE  (SEE:  LINE  00147) 

4.  TONER 

5.  OETPTRS  (SEE  LINE  00203) 

5.  TAPE6A 
5.  OUTCI. 

5.  UNPACK  (SEE  LINE  00189) 

5.  UOLLOAO  (SEE  LINE  00596) 

5.  INITACQ 

6.  ENTRYP  (SEE  LINE  0001D 

5.  3I«NE  (SEE  LINE  00153) 

6.  A008L0K  (SEE  LINE  00359) 

6.  ALOS. 

6.  MESA3E  (SEE  LINE  00012) 

6.  RITE!  (SEE  LINE  00015) 

6.  XTOT. 

6.  NONUCIT  (SEE  LINE  00350) 

6.  EXITS  (SEE  LINE  00033) 

5.  DELAOO  (SEE  LINE  00162) 

5.  SACK  (SEE  LINE  00277) 

5.  FlNOBLK  (SEE  LINE  00207) 

5.  REOEBRF 

6.  UNPACK  (SEE  LINE  00189) 

6.  FlNOBLK  (SEE  LINE  00207) 


PA3E  99 


0153a 

s. 

KIPEOUT 

01539 

6. 

GIMME 

(SEE  LINE  00153) 

01540 

6. 

AOOBLOk 

(SEE  LINE  00359) 

01541 

6. 

PELAOO 

(SEE  LINE  00966) 

01542 

6. 

DESTROY 

(SEE  LINE  00343) 

01543 

5. 

STMME 

(SEE  LINE  00153) 

01544 

5. 

GOGETEM 

01545 

6. 

UNPACK 

(SEE  LtNE  00189) 

01546 

6  . 

r  inoslk 

(SEE  LINE  00207) 

0154? 

6. 

CRFLTML 

(SEE  LINE  00989) 

0154a 

6. 

TAPES# 

01549 

6. 

OUTCI. 

01550 

6. 

GIMME 

(SEE  LINE  00153) 

01551 

6. 

AOOBLOK 

(SEE  LINE  00359) 

01552 

6. 

ptrano 

01553 

7.  UNPa! 

IK  (SEE  LINE  00189) 

01554 

7.  RANODM. 

01555 

7.  HEX A 30  (SEE  LINE  00252) 

01556 

7.  HEXMJLT  (SEE  LINE  00353) 

01557 

7.  GEThEX  (SEE  LINE  00264) 

01558 

6. 

PACK 

(SEE  LINE  00277) 

01559 

6. 

FLTGEOm 

(SEE  LINE  01003) 

01560 

6. 

UOLLOAQ 

(SEE  LINE  00596) 

01561 

6. 

INI T  ACo 

(SEE  LINE  01522) 

01562 

6. 

OELAOO 

(SEE  LINE  00162) 

01563 

6. 

MES8ILO 

(SEE  LINE  00275) 

01564 

5. 

MES8IL0 

(SEE  LINE  00275) 

01565 

5. 

DCSTROT 

(SEE  LINE  00343) 

01566 

4. 

umpire 

01567 

5. 

UNPACK 

(SEE  LINE  00189) 

01568 

5. 

TMH2PS 

(SEE  LINE  00226) 

01569 

5. 

S3RT. 

01570 

5. 

XTOI. 

01571 

5. 

HISTORY 

(SEE  LINE  00330) 

01572 

5. 

RANDOM. 

01573 

5. 

TAPE6# 

01574 

5. 

OUTCI. 

01575 

5. 

OTMME 

(SEE  LINE  00153) 

01576 

5. 

PACK 

(SEE  LINE  00277) 

01577 

5. 

DELAOD 

(SEE  LINE  00162) 

01578 

5. 

DESTROY 

(SEE  LINE  00343) 

01S79 

5. 

RELEASE 

(SEE  LINE  00147) 

01580 

5. 

NUK8LN0 

(SEE  LINE  00509) 

01581 

4. 

TAPES# 

01582 

4. 

OUTCI • 

01583 

4. 

OUTCR. 

01584 

4. 

EXITP 

(SEE  LINE  00033) 

01585 

3.  SNAP 

(SEE 

LINE  00168) 

01586 

3.  UNSNAP 

1SEE 

LINE  00196) 

01587 

3.-  RELEASE 

(SEE 

LINE  00147) 

01588 

3.  SECOND 

01589 

3.  HLTPNT 

01590 

4. 

ENTRYP 

(SEE.  LJNE  00011  ) 

01591 

4. 

SECONO 

01592 

4. 

MALT 

(SEE  LINE  00009) 
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3.  Post  Processor 


LIST  OF  SU980UTI  MFS  -  BEC030 


1.  EOF 

2.  INOEx 

3.  HgSASE 
*.  cage 

5.  BECOBU 

6.  BtTEt 

7.  B  t  TEB 
S.  TaBOuT 


r 


LIST  OP  FOaTSAN  LT3PAPY  ROUTINES  -  ?ECD^3 


U  INPCI. 
2.  INPFt. 

а.  outct. 

*.  ouTca. 

s.  qintpy. 

б.  STOP. 

?.  TAPE** 


465 


SU8R0UTINE  REFERENCE  LTST  -  PECORO 


PAGE 


3 


1.  EOF 

CALLED  3Y : 

PECORO 

2.  I NOEX 

calls: 

TAPES* 

OUTCI. 

called  3y: 

PECORO 

3.  MESAGE 

calls: 

T  APE6  * 

OUTCI . 

CALLED  3Y 1 

TA30UT 

RECORD 

A.  PAGE 

CALLS: 

TAPE6* 

OUTCI. 

CALLED  3Y  1 

TA30UT 

PECORO 

5.  RECORD 

CALLS : 

Q1NTBY. 

INPCI. 

INPFI. 

PAGE 

OUTCI. 

EOF 

INOEX 

MESAGE 

RITEI 

PITER 

TA90UT 

STOP. 

4.  BITEI 

calls: 

TAPES* 

OUTCI. 

CALLED  3 Y : 

PECORO 

7.  PITER 

calls: 

TAPE6* 

OUTCI. 

CALLED  3Y : 

RECORD 

8.  TiBOUT 

calls: 

PAGE 

MESAGE 

tapes* 

OUTCI. 

OUTCP. 

CALLED  9YI 

PECORO 
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FORTRAN  LIBRARY  RE-ERENCE  LIST  -  RECORD 


RASE  A 


INPCI. 

CALLED 

an 

RECORD 

INPFt  . 

called 

ay  i 

RECORD 

OUTCI . 

called 

ay  i 

T  ABOUT 
RITER 

rite: 

RASE 

NESAGE 

INDEX 

RECORD 

outcr. 

called 

Byt 

TABOUT 

JInTRy. 

called 

BY  I 

RECORD 

STOP. 

called 

3y: 

RECORD 

TAPES* 

CALLEO 

by: 

TABOUT 

RTTE.R 

RITEI 

RASE 

MESAGE 

INDEX 
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9EC0RD 


SU893 JT  t  >n£  CALLING  HI£RA9C-<  Y 


OOOQ1 

1.  9EC390 

00002 

2. 

319TRY. 

00003 

2. 

rvscr. 

OOOO* 

2. 

IMOPJ . 

00005 

2. 

RASE 

00006 

3-  TA(S£6» 

00007 

3.  OuTCt. 

ooooa 

2. 

OUTCt. 

00009 

2. 

EOP 

00010 

2. 

I90EX 

00011 

3.  T»P?6* 

00012 

3.  OuTd. 

00013 

2. 

XESAGE 

ooou 

3.  TaP?6* 

00015 

3.  aurct. 

00016 

2. 

*mi 

0001  7 

3-  TA9E5A 

oooia 

3.  QUTct. 

00019 

2. 

rites 

00020 

3.  TAPP6A 

00021 

3.  OUTCI. 

00022 

2. 

rA3qar 

00023 

3.  0 AGE 

0002* 

3.  HESASE 

00025 

3.  TA»E6» 

00026 

3.  OuTCI . 

00027 

3.  OUTCS. 

00028 

2. 

STOO. 

(SEP  LIME 

<sep  wi'ie 


00005) 

00013) 


APPENDIX  I 


MADEM  DEBUG  ROUTINES 

This  appendix  contains  an  alphabetical  list  and  description  of  the 
debug  routines  available  in  MADEM.  Following  this  list  is  a  more  detailed 
description  of  how  to  implement  certain  of  these  capabilities. 

ADUMP  -  Dumps  to  the  printer  any  array  in  octal. 

Parameters: 

IARRAY  -  array  to  be  dumped 
ISTART  -  offset  of  first  word  to  be  dumped 
LENGTH  -  number  of  words  to  be  dumped 
INAME  -  hollerith  name  of  the  array 
ANALYZE  -  A  separate  program  that  analyzes  a  binary  file  and 
gives  the  following  information: 

Cross  reference  of  all  routine  calls 
Complete  calling  hierarchy 

BLOCK 

DATA 

ROUTINES  -  41  routines,  each  representing  a  data  block,  that  can 

be  manipulated  to  creat  data  structure  display  routines. 
Each  block  routine  is  capable  of  printing  data  blocks 
or  a  list  of  data  blocks,  and  of  calling  other  block 
routines  to  print  subordinate  lists. 

Parameters: 

POINTER  -  pointer  to  first  data  block 
LEVEL  -  number  of  hierarchical  types  of 
blocks  to  print  in  the  data 
structure 

MAXBLKS  -  number  of  blocks  in  the  main  list 
to  be  printed. 

CLIST 

(and 

CLIST2)  -  Common  block  dump  routine.  Prints  key  common  pointer 


DBGREAD  - 

DISPLAT  - 

ENTRVP 


ENTSTAT 

EXITP 

HALT 


Debug  parameter  read  routine.  Reads  ail  input  param¬ 
eters  used  for  debug  purposes.  These  parameters  are 
interpreted  and  the  necessary  flags  are  set  to  activate 
these  parameters.  Invalid  parameters  are  ignored. 
Display  DATFILE  data  structure.  Uses  13  of  the  block 
data  routines.  Activated  by  a  debug  parameter. 

Entry  debug  routine.  Called  at  the  beginning  of  most 
MADEM  subroutines.  Keeps  track  of  the  calling  hier¬ 
archy  in  the  pushdown  stack  and  of  the  last  50  routines 
called  in  the  circular  list.  Counts  the  number  of 
times  each  routine  calls  ENTRYP  and,  along  with  EXITP, 
times  the  exectuion  of  these  routines.  Optionally, 
ENTRYP  can  call  debug  routines  ITRAP  and  ICHEC.  Also, 
can  optionally  print  specified  routine  trace  messages. 
These  options  are  set  through  debug  parameters. 

Parameter: 

SEGNUM  -  segment  number  of  calling  routine 
Prints  vector  of  routine  entry  counts,  execution  times, 
trace  message  flags,  and  debug  call  flags. 

Same  as  ENTRYP,  but  called  at  the  end  of  a  routine 
rather  than  at  the  beginning. 

Parameter: 

SEGNUM  -  segment  number  of  calling  routine 
Used  whenever  the  simulation  is  to  be  stopped.  Per¬ 
forms  the  following  functions,  mostly  through  subrou¬ 
tine  calls: 

•  creates  hold  files  for  restarts 

•  prints  name  of  calling  subroutine 

•  prints  reason  for  termination. 

•  prints  pushdown  stack 

•  prints  names  of  last  50  routines  called 

•  calls  ENTSTAT  (see  ENTSTAT) 
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•  calls  CLIST  (see  CLIST) 

•  optionally  (controlled  by  debug  parameter) 

prints  ISPACE. 

«  Stops  the  simulation. 

Parameters: 

SEGNUM  -  segment  number  of  calling  routine 
MSGHALT  -  forty  character  message 

ICHECK  -  Checks  specified  locations  in  ISPACE,  and  prints  a  mes¬ 

sage  when  the  value  of  that  location  changes.  The  mes¬ 
sage  indicates  the  old  value,  the  new  value,  and  the 
last  non-debug  routine  called.  The  ISPACE  locations 
are  selected  through  debug  parameters  read  by  DBGREAQ. 
DEBUG  must  be  set  to  "ON"  for  ICHECK  to  be  called  from 
any  given  routine  (see  DBGREAD) . 

Parameter: 

SEGNUM  -  segment  number  of  calling  routine 
ICOMP  -  A  separate  program  that  compares  two  sets  of  hold  files 

and  indicates  when  there  are  differences  in  the  I  SPACE’S . 
Used  when  midasizing,  to  insure  the  midasized  version 
runs  the  same  as  the  unmidasized  version. 

Parameters : 

ISTART  -  first  word  of  ISPACE  to  be  compared 
IMAX  -  last  word  of  ISPACE  to  be  compared 
MAXDIFF  -  maximum  number  of  mismatches  before 
stopp i ng 

IEXTRA  -  maximum  number  of  extra  words 

printed  if  one  ISPACE  is  larger 
than  the  other. 

HSIZE1  -  number  of  ISPACE  words  in  each  hold 
file  for  second  I SPACE. 
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ISDUMP 


ITRAP 


LOCATE 

NIPULSTOR  - 


RECCON 

RECER 


Dumps  to  printer  selected  portions  or  all  of  the  ISPACE 
array.  Will  always  print  at  least  the  first  ten  words. 
Parameters: 

ISTART  -  first  word  to  be  dumped 
LENGTH  -  number  of  words  to  be  dumped 
Checks  ISPACE  of  zero  and  ISPACE  locations  one  through 
eight  for  proper  values.  ISPACE  of  zero  should  always 
be  equal  to  99999999.0,  and  other  eight  locations 
should  always  be  zero.  If  any  of  these  locations  have 
improper  values,  then  HALT  is  called  to  stop  the  simu¬ 
lation  and  print  debug  information.  DEBUG  must  be  set 
to  "ON"  for  ITRAP  to  be  called  from  ENTRYP  and  EXITP 
(see  DBGRAD). 

Parameter: 

SEGNUM  -  segment  number  of  calling  routine, 
or  of  routine  that  called  ENTRYP/ 
EXIT. 

A  batch  text  search  program  that  can  be  used  as  a  MIDAS 
cross  reference  program. 

A  post  run  debugging  facility  that  can: 

1.  Print  selected  areas  of  ISPACE. 

2.  Dump  the  C2  data  structures. 

3.  Dump  the  EVENT  tree. 

4.  Dump  structures  of  a  given  unit. 

5.  Call  CLIST. 

See  the  detailed  description  at  the  end  of  this 
appendix. 

Activated  only  by  RECOUR  in  the  event  of  abnormal  job 
termination  and  subsequent  recovery.  Calls  HALT  to 
print  debug  inforamtion  and  stop  the  simulation. 

Prints  current  calling  hierarchy  (pushdown  stack)  and 
the  names  of  the  last  50  subroutines  called  (circular 
list). 
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RECOUR  -  Allows  the  MADEM  program  to  regain  control  of  execution 
at  the  time  that  abnormal  job  termination  would  other¬ 
wise  occur.  RECOUR  calls  RECCON  in  the  event  of  catas¬ 
trophic  failure.  RECOUR  is  automatically  initialized 
at  the  beginning  of  the  MADEM  Program.  RECOUR  may  be 
turned  off  by  using  debug  parameter  "REC0UR=0FF. " 

Parameters: 

NAME  -  name  of  the  routine  to  be 

executed  if  flagged  conditions 
occur  (RECCON) 

FLAGS  -  octal  value  of  error  conditions 
that  trip  RECOUR  (077) 

CHECKSUM  -  No  checksum  desired  (0) 

ROUTER  -  Same  as  RECER ,  but  with  SEGNUM  as  a  parameter,  so  the 
calling  routine  name  can  be  printed. 

MADEM  DEBUG  PARAMETERS 

The  INPUT  file  to  MADEM  holds  various  parameters  that  affect  only  the 
particular  volume  that  is  being  run.  The  first  input  card  holds  seven 
numbers  described  under  MADEM  Operations.  This  card  is  mandatory.  Debug 
parameters  follow  this  first  card,  and  are  entirely  optional.  There  are  a 
variety  of  debug  options  which  may  be  turned  on  or  off  by  using  debug 
parameters.  These  options  and  their  correspondi ng  parameters  are  listed 
below.  Parameters,  except  where  noted  otherwise,  must  begin  in  column  one. 
All  parameters  are  actually  ten  characters  long,  with  either  leading  or 
trailing  blanks  implied. 

The  debug  options: 

1 .  Debug  Status 

For  each  routine  that  calls  ENTRYP  and  EXITP ,  the  debug  status  is 
set  to  either  "ON"  or  "OFF".  When  debug  is  "ON"  for  a  routine,  then  ENTRYP 
and  EXITP  have  the  addition  of  calling  ITRAP  and  ICHECK  when  processing 
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that  routine.  This  slows  down  execution  considerably  when  many  routines 
are  "ON,"  but  is  a  valuable  debug  tool. 

DEFAULT:  Debug  is  "OFF"  for  all  routines. 

PARAMETERS: 

"DEBUG=0NI4b"  -  turns  delay  to  "ON"  for  all  routines 
“DXXXXXXXbtf  -  where  XXXXXXX  is  a  routine  name. 

Changes  the  debug  status  of  that  routine 
only.  If  it  was  "ON,"  it  is  set  to 
"OFF,"  and  vice-versa.  By  using  "DEBUG- 
ONtfki"  followed  by  a  few  occurrences  of 
this  parameter,  all  routines  but  a  few 
can  be  set  to  "ON."  Likewise,  by  only 
using  this  parameter,  only  a  few  rou¬ 
tines  can  be  set  to  "ON." 


2.  Trace  Status 

The  same  as  debug  status,  except  that  what  is  being  turned  "ON" 
and  "OFF"  is  the  printing  of  subroutine  call  trace  messages. 

DEFAULT:  Trace  is  "OFF"  for  all  routines. 

PARAMETERS: 

"TRACEONW  -  turns  on  trace  messages  for  all 
routines. 

"TXXXXXXXMJ  -  same  as  "DXXXXXXXBfeS"  but  for  the  trace 
status. 

Never  use  "TRACE=0N"  by  itself.  The  resulting  output  will  be  thousands  of 
pages  of  trace  messages. 

3.  Recovery  Status 

Controls  the  initilizi ng  of  system  recover  routine  RECOUR.  When 
recover  is  "ON,"  then  RECOUR  will  be  initiated  upon  abnormal  termination. 
When  Recover  is  ‘OFF,"  no  calls  will  be  made  to  RECOURI. 

DEFAULT:  Recover  is  set  to  "ON" 

PARAMETER: 

"REC0UR=0FF"  -  turns  off  recovery  routine. 
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4.  Icheck  Status 

Controls  ISPACE  locations  checked  by  debug  routine  ICHECK.  To 
have  ISPACE  locations  checked,  the  word  "CHECK"  must  start  in  column  1, 
followed  on  the  same  card  by  up  to  seven  decimal  ISPACE  pointer  right  jus¬ 
tified  ending  in  columsn  10x,  where  x  =  2  thru  8.  All  check  cards  together 
may  not  have  more  than  ten  ISPACE  locations. 

DEFAULT:  no  ISPACE  locations  are  checked. 

5.  Release  Status 

The  allocation  of  blocks  in  ISPACE  is  controlled  by  two  routines: 
GIMME  and  RELEASE .  Release  un~al locates  previously  used  storage  for  future 
use.  Sometimes  it  is  advantageous  to  turn  off  release  so  that  all  new 
blocks  will  be  allocated  it  the  end  of  "used"  ISPACE  (free  space).  This  is 
done  by  turning  the  release  status  off.  It  also  must  be  indicated  after 
which  event  within  the  volume  that  release  is  turned  off.  To  turn  release 
off,  put  "RELEASE000"  beginning  in  column  one,  followed  on  the  same  card  by 
a  decimal  number  ending  in  column  20.  This  number  is  the  event  after  which 
release  is  turned  off. 

DEFAULT:  Release  is  never  turned  off. 

6.  Stop  Status  (Pre-processor  only) 

The  Stop  Status  controls  how  far  the  preprocessor  runs  before 
stopping.  There  is  no  restart  capability  for  the  preprocessor;  the  early 
stops  are  for  debugging  purposes  only. 

DEFAULT:  Pre-processor  runs  to  normal  completion. 

PARAMETERS: 

"STOP=ODAT0"  -  stops  after  reading  DATFILE. 

"STOP=UOIL0"  -  stops  after  reading  UOIL. 

"ST0P=0EL"  -  stops  after  planning  first  event. 

7.  Datfi le  Display  (Pre-processor  only) 

To  get  DISPDAT  to  print  the  DATFILE  data  structure,  use  parameter 
"OATFL£=ON0" . 


DEFAULT:  Datfile  is  not  displayed 
PARAMETER: 

"DATFLE=0N8" 


8.  Ispace  Dump 

DEFAULT:  only  first  ten  words  of  ISPACE  are  dumped 
PARAMETER: 

"DUMP=ONtSti^"  -  all  of  ISPACE  dumped. 


NIPULAT8T0R 


NIPUL8T0R  is  a  fortran  program  that  was  written  to  use  as  a  debugging 
tool  for  MADEM.  NIPUL8T0R  can  dump  selected  areas  of  ISPACE,  selected  data 
structures,  or  MADEM' s  common  blocks. 

At  the  end  of  each  MADEM  run  (or  volume  of  a  run),  MADEM  saves  ISPACE 
and  all  other  common  blocks  in  a  series  of  files.  NIPUL8T0R  gets  ISPACE 
and  the  common  blcoks  from  this  series  of  files.  To  maintain  compatibil¬ 
ity,  NIPUL8T0R  uses  MADEM' s  fetch  routine  to  retrieve  the  data  from  these 
files.  NIPUL8T0R  also  uses  MADEM' s  CLIST  subroutine,  as  well  as  the  sub¬ 
routines  that  CLIST  calls. 

USING  NIPUL8T0R 


To  use  NIPUL8T0R,  you  need: 

1)  The  binary  file  "NIPUL8T0R" 

2)  The  series  of  MADEM  files  that  holds  ISPACE  and  the  common 
blocks 

3)  The  correct  set  of  NIPUL8T0R  directives  that  tell  NIPUL8T0R 
exactly  which  dumps  you  want. 

The  sample  JCL  deck  on  the  next  page  shows  the  input  that  will  give  you  an 
end  of  Volume  3  dump  that  exercises  all  the  NIPUL8T0R  options.  The  first 
four  attach  commands  access  the  MADEM  files  that  were  dumped  by  a  volume  3 
run.  The  NIPUL8T0R  directives  (commands)  and  directive  parameters  are  also 
shown. 
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WBDM8SM , ST1 76 ,T200 ,10177, P60 , EC4Q0.  MADEM  NIPUL8T0R  RUN 

ACCOUNT  BSMBUM,  WDNA14V6-SGC ,BDM,703-821-4223.  B  MACALLER 
COMMENT. 

COMMENT  *************************************** 

COMMENT.  *  VOLUME  1 ,  RUN  TYPE  AAA  * 

COMMENT  *************************************** 

ATTACH , TAPE 1 5 , P  LAN 1  AAA , I D=WDNA 1 4V6 . 

ATTACH , TAPE 1 6 , PLAN2AAA , I D=WDNA 1 4V6 . 

ATTACH , LGO , N I PUL8T0 R , I 0=WDNA 1 4V6 . 

LDSET,PRESET=ZERO. 

LOAD, LGO. 

EXECUTE, ,PL=50000. 

AUDIT, ID=WDNA14V6. 

EXIT. 

AUDIT, ID=WDA14V6. 

S l  EOR 


1000,2000 


1500,500 


PTR-0021 96 


PTR=01 2345 


DUMP  SELECTED  AREA  OF  ISPACE 


OUMP  AROUND  A  WORD  OF  ISAPCE 


DUMP  A  C2  STRUCTURE 


OUMP  THE  BLUE  C2  TREE 


DUMP  THE  RED  C2  TREE 


DUMP  LEFTIST  TREE  AND  EVENT  NODE  INFO 


DUMP  THE  DEL  AND  EVENT  INFO 


14225 


DUMP  STRUCTURES  OF  A  GIVEN  UNIT 


DUMP  COMMON  BLOCKS 


EOI 
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DIRECTIVES  FOR  NIPUL8T0R 


Directives,  submitted  through  an  input  deck,  tell  NIPUL8T0R  exactly 
what  to  dump.  Depending  on  the  directive,  there  may  be  zero,  one,  or  two 
parameters  on  the  input  card  following  the  directive.  The  directive 
appears  alone  on  a  card.  The  directive  is  a  digit  (1-7),  and  directive 
parameters  are  either  decimal  integers  or  commands,  as  indicated  below. 
There  is  no  limit  to  the  number  of  directives  used  in  the  SIPUL8T0R  run,  or 
to  the  number  of  repetitions  of  any  one  directive.  The  directives  are  not 
order  dependent. 

DIRECTIVE  1:  Dump  a  selected  area  of  ISPACE.  This  directive  will 
dump  a  chunk  of  ISPACE,  as  defined  by  the  two  parameters. 

PARAMETERS 

1)  First  word  of  ISPACE  to  be  dumped. 

2)  Last  word  of  ISPACE  to  be  dumped. 

Obviously,  the  first  PARM  must  be  less  than  or  equal  to  the 
second  PARM. 

DIRECTIVE  2:  Dump  around  a  word  of  ISAPCE.  This  directive  will  also 
dump  a  chunk  of  ISPACE  as  defined  by  the  two  parameters,  but  the 
PARMS  have  different  meanings. 

PARAMETERS 

1)  Middle  word  of  ISPACE  area  to  be  dumped. 

2)  Number  of  words  on  either  side  of  the  middle  word, 
to  be  dumped. 

DIRECTIVE  3:  Dump  the  C2  structure  CTREED.  This  directive  will  dis¬ 
play  a  C2  tree  as  defined  by  the  parameter.  It  may  be  used  to 
dump  the  red  or  blue  C2  trees,  or  any  subset  of  a  C2  tree.  For 
each  unit  in  the  C2  tree,  the  SB,  SDB,  C2,  and  unit  status  board 
blocks  will  be  displayed. 
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PARAMETERS 


3  options  that  define  the  C2  tree: 

1)  RED  -  dumps  the  red  C2  tree 

2)  BLUE  -  dumps  the  blue  C2  tree 

3)  PTR= 1 1 1 1 1 1 ,  where  1 1 1 1 1 1  =  pointer  to  buffer 
at  top  of  C2  tree.  ( 1 1 1 1 1 1  is  a  right  justi¬ 
fied  6  digit  integer). 

To  dump  a  subset  of  a  tree,  use  PTR=XXXXXX,  where  XXXXXX  =  PTRC2  + 
1,  where  PTRC2  points  to  unit  above  the  top  unit  in  the  subset, 
(i.e,  PJRCZ  +  1  simulates  the  buffer). 

DIRECTIVE  4:  Dump  leftist  tree  and  event  node  info.  This  directive 
will  dump  the  leftist  tree  and  corresponding  event  blocks. 
PARAMETERS 

One  PARM,  defines  leftist  tree. 

2  options: 

1)  DEL  -  dumps  discrete  event  list 

2)  PTR  =  IIIIII,  where  IIIIII  is  a  right  justi¬ 
fied  6  digit  integer  that  points  to  the  top 
node  in  the  tree. 

DIRECTIVE  5:  Not  used.  Future  plans  call  for  a  hex  structure  dump. 

DIRECTIVE  6:  Dump  structures  of  a  given  unit.  This  directive  can  be 
used  to  dump  the  blocks  of  a  given  unit,  where  the  unit  is  dis¬ 
played  as  in  the  C2  dump. 

PARAMETER 

Decimal  integer  pointer  to  the  C2  unit  to  be  dumped. 

DIRECTIVE  7:  Dump  the  common  blocks.  This  directive  will  display 
most  of  MADEM's  common  blocks. 

No  PARAMETERS,  do  not  use  a  second  card. 
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